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Guten Tag 


Uff, wir fordern für unseren armen 
Briefträger mehr Weihnachtsgeld 
von seinem Minister! Denn was sich 
derzeit hier abspielt, ist atemberau- 
bend! Die sprichwörtlichen Wasch- 
körbe reichen nicht aus, um all die 
an uns zurückgesandten Fragebogen 
aus Heft 11 zu fassen, das Postfach 
quillt schon lange über und besteht 
eigentlich nur aus Hinweisen, man 
möge die Post doch bitte am Schal- 
ter abholen. 

Danke, liebe Leser, zumal die 
erste Auswertung querbeet ergab, 
daß die neue SCHNEIDER AKTIV 
offensichtlich gut ankommt. 

Trotz dieser Flut: Versprochen 
ist versprochen: Im nächsten Heft 
werden Sie lesen können, wer den 
PC von Schneider gewonnen hat, 
der Sieger wird seinen Gewinn 
noch auf den weihnachtlichen Ga- 
bentisch stellen können. Etwas län- 
ger warten werden allerdings die 
Gewinner des zweiten und dritten 
Preises müssen: Für sie haben wir 
als Überraschung für das nächste 
Frühjahr einen achttägigen Urlaub 
in einem Luxushotel gebucht, mehr 
wird noch nicht verraten. 

Verraten allerdings können wir 
schon jetzt, daß es uns gelungen 
ist, einen guten Schneider-Exper- 
ten zur festen Mitarbeit zu über- 
reden — mehr darüber in der näch- 
sten Ausgabe. 

Mit einer anderen Ausgabe hat- 
ten wir Sorgen, mit der Nummer 
10. Da wir mit offenen Karten 
spielen: Dies war — für die Abon- 
nenten — wegen des Verlagswech- 
sels eine Doppelausgabe 9 + 10 {!). 
Und zusätzlich mußten die Softbox- 


TEST & TECHNIK 


Ghostbuster: 
Vorsicht vor Gespenstern 


ab Seite 8 


Space-Invasion: 


Simples Ballerspiel auf Seite 9 


Dateiverwaltung: 
Vergleichstest dritter Teile und 
Schlußbewertung ab Seite 10 


Maus: 


Mit dem Nagetier malen ab Seite 18 


Besteller noch unüblich lange auf 
ihre Disketten und Kassetten war- 
ten. Deshalb auch hier: Entschul- 
digung. Der Grund ist simpel. 
Zunächst einmal gab es — man 
höre und staune — keine Disketten 
in der von uns benötigten Menge! 
Dann mußte das von uns beauftrag- 
te Kopierwerk — unsere Kassetten 
werden digital kopiert — zwei Wo- 
chen auf die Lieferung eines Schnei- 
der CPC warten, sie waren ebenfalls 
ausverkauft! 

Mittlerweile hat sich das jedoch 
eingespielt, die Software verläßt 
unseren Verlag in der Regel spä- 
testens zwei Wochen nach Bestel- 
Jungseingang. 

Allerdings nicht immer. Manche 
Leser sind so nett, uns eine Bestel- 
lung mit hingekrakelter Unterschrift 
zu schicken, vergessen aber einfach 
Name und Anschrift. Andere über- 
weisen auf unser Konto, ebenfalls 
ohne Adresse oder gar einen Hin- 
weis, wofür das Geld denn sein 
solle. Deshalb: Bitte immer — auch 
bei Banküberweisungen! — wenig- 
stens den Namen in Druckbuch- 
staben angeben! ‚Peter Müller, 
Köln’ reicht einfach nicht! Sie 
sind sauer, weil die Ware nicht 
kommt, der Abo- und Kassetten- 
service ist sauer, weil er weder 
verbuchen noch liefern kann und 
der Verleger ist sauer, weil die 
Nachforschungen viel Zeit und Geld 
kosten. 

Also bitte: Bei allen Bestellungen 
Name, Anschrift und Zweck ange- 
ben. Nicht vergessen! 

Und nicht vergessen: Sind Sie 


Telefon: 
Die Rufnummern der 


User-Clubs auf Seite 13 


Glosse: 
Wie IBM die Festplatte 


erfand ab Seite 14 


Fragen: 
Antworten auf „brennende“ 


Probleme ab Seite 15 


Satire: 
Das neue Monster von 


Loch Neß ab Seite 16 


Serie: 
MS-DOS und der Umgang mit 


dem neuen Betriebssystem ab Seite 64 


HiSoft-Pascal: 
Warum einfach, wenn es umständ- 


lich geht ab Seite 67 
Börse: 

Zum Suchen und Finden — 

drei Seiten Kleinanzeigen ab Seite 70 


Amstrad-Messe 
In London gab es viel zu sehenab Seite 74 


LISTINGS 


Hobby-tronic: 


Messe der Händler auf Seite 79 
Mathe: 

Ein Programm errechnet 

nahezu alles ab Seite 26 


Basic-Trickkiste: 
Sie wissen gar nicht, was mit den 


mit uns zufrieden, sagen Sie es bitte Schneiders alles möglich ist ab Seite 35 
weiter. Sind Sie es nicht, sagen Siel Darwin: 
es uns. Die menschliche Entstehung im 
Ihr SCHNEIDER AKTIV-Team Zeitraffer ab Seite 47 
Crossreferenz: 
Bildkontroller: Das angepaßte Programm 
Mit dem Video-Baustein für den 6128 ab Seite 49 
zaubern ab Seite 20 
Senso: 
Basic-Compiler: Paßt auf alle Schneider- 
Wirklich schneller? ab Seite 22 Computer ab Seite 50 
Billig-PC: Disk-Operating: 
Lohnt sich der Kauf eines Relatives DOS für die DD1 ab Seite 54 
Lowcoast-Computers? ab Seite 76 
Turboskript: 


REPORT & SERVICE 


Mikroprozessor: 
Wissen, was im Computer 
steckt 


ab Seite 4 


Ein vielseitiges Programm mit 


neuen Befehlen ab Seite 58 
Skat: 

Lassen Sie den Computer doch 

Buch führen ab Seite 62 
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REPORT 


DER MIKROPROZESSCO 


DAS HERZ DES COMP 


REPORT 


Verschiedene Computertypen haben oftmals verschiedene Mikroprozessoren. 
Für die meisten Anwender ist der Bautyp dieses Bausteins uninteressant, 
denn sie programmieren nicht in Maschinensprache. Dennoch sollte man den 
einen und anderen grundlegenden Unterschied zwischen den verschiedenen 
Prozessorengruppen kennen, um etwa Geschwindigkeitsvorteile eines bestimmten 
Systems (wie Amiga) gegenüber eines anderen (wie 664) nur durch Lesen 

des Datenblattes deuten zu können. 


Prozessor ist nicht gleich Prozessor, 
und eine höhere Taktrate bedeutet 
nicht eine automatisch höhere Ver- 
arbeitungsgeschwindigkeit. Viele 
andere Faktoren beeinflussen eben- 
falls die Bearbeitungszeit, die ein 
Prozessor zur Ausführung eines Be- 
fehles benötigt. Bei handelsüblichen 
Home- und Personalcomputern sind 
das Punkte wie: 

— Datenbusbreite 

— Interne Registerbreite 

— Taktgeschwindigkeit 

— Prozessoreigener Speicher 

— “Pipeline“-Techniken 

— Befehlssatz. 

Beginnen wir mit der Datenbus- 
breite: 


Ein Prozessor benutzt, je nach Bau- 
art, immer eine bestimmte Anzahl 
an Beinchen zur Datenein- und Aus- 
gabe zum Hauptspeicher des Com- 
puters. Im Normalfall benutzt ein 

8 Bit-Prozessor, wie der der Schnei- 
der Modelle und des ZX81 einen 
8Bit-Datenbus. Der IBM PC, als 
Ausnahme, hat einen internen 16 Bit- 
Prozessor und wird von vielen An- 
wendern daher als 16 Bit-Maschine 
bezeichnet. Insider nennen ihn 
allerdings auch Pseudo-16-Bit- 
Computer. 

Atari liefert mit seinen ST-Geräten 
(ST=sixteen=sechzehn) echte 16 Bit- 
Computer. (Allerdings werden diese 
Systeme in einigen Fachzeitschrif- 
ten als 32 Bit-Rechner bezeichnet, 
weil auch der 16 Bit-Prozessor (Mo- 
torola 68000) intern 32 Bit bearbei- 
ten kann und somit, ähnlich dem 
IBM PC, verwechselt wird.) 
Inwieweit hängt die Verarbeitungs- 
geschwindigkeit von der Datenbus- 
breite ab? Diese Frage ist ganz ein- 
fach an folgendem Beispiel zu er- 
kennen. Auf dem Markt gibt es, un- 
ter anderen, zwei Computer, die 
nahezu denselben Prozessor benut- 
zen. Es sind der Sinclair QL (Moto- 
rola 68008) und der Amiga (Moto- 
rola 68000). Der Unterschied zwi- 
schen den beiden Prozessoren liegt 
in der Datenbusbreite: Der Sinclair 
hat einen 8 Bit-Datenbus, der Amiga 
einen 16 Bit-Bus. Will der Amigabe- 
nutzer nun die Werte EF DA aus 
zwei Speicherstellen lesen, so kann 2» 


er dies, aufgrund der Datenbusbreite 
von 16 Bit, innerhalb eines Schrit- 
tes erreichen, während der 68008 
des Sinclairs dafür 2 Schritte benö- 
tigt. (Er liest beide Bytes nacheinan- 
der ein. Ebenso verhält es sich beim 
Schreiben der Daten in den Spei- 
cher.) 

Dieser Umstand bewirkt längere Re- 
chenzeiten bei häufigem Zugriff 
auf den Hauptspeicher des Compu- 
ters. Dies ist auch die Ursache dafür, 
daß die neueren Computer Prozes- 
soren immer höhere Bus-Breite be- 
inhalten. Hatten der IBM PC und 
der PC/XT noch einen Pseudo 16- 
Bit-Prozessor, so besitzt der AT be- 
reits einen echten 16 Bit-Baustein, 
der intern sogar 32 Bit bearbeiten 
kann. In einigen Jahren wird selbst 
dieser Baustein veraltet sein, denn 
schon ist ein echter 32 Bit-Prozessor 
auf dem Markt, der die Befehle sei- 
ner Vorgänger versteht, also Soft- 
warekompatibel ist. 


INTERNE REGISTERBREITE 


Wie wir bereits wissen, gibt es Pro- 


zessoren, die zwar nur einen 8 Bit- 
Datenbus besitzen, aber intern 16 
Bit verarbeiten können. Der Vorteil 
dieser Verarbeitungstechnik liegt, 
ähnlich dem des größeren Daten- 
busses, darin, daß für eine Berech- 
nung von 16 Bit-Daten (2 Bytes = 
Word genannt) nur ein Rechenvor- 
gang benötigt wird, während der 

8 Bit-Prozessor die zweistellige Zahl 
mühsam und vor allem zeitraubend 
in zwei einstellige Werte umwan- 
deln muß, bevor er diese berechnen 
kann. Der Zeitvorteil dieser internen 
16 Bitbearbeitung gegenüber der 

8 Bitbearbeitung liegt damit klar auf 
der Hand. Gegen einen ansonsten 
funktionsgleichen Prozessor mit 
echtem 16 Bit-Bus hat dieser Bau- 
stein allerdings (wie vorher be- 
schrieben) keine Chance. 


TAKTGESCHWINDIGKEIT 


Jetzt endlich kommen all diejenigen 


zu Wort, die am Anfang geglaubt 
hatten, daß nur die Taktfrequenz 
die Verarbeitungsgeschwindigkeit 
eines Computers bestimmt. Die 
Taktfrequenz (z.B. 4 MHz) ist ein 
Begriff der dadurch definiert ist, daß 
ein Prozessor in einer Sekunde die 
jeweilige Anzahl an Schwingungen 
durch einen Taktquarz erhält (in un- 
serem Beispiel 4 Millionen), die er 
zur Abarbeitung eines Befehles be- 
nötigt. (Verschiedene Befehle be- 
nötigen meist eine verschiedene 
Anzahl an Schwingungen.) Die 
Taktfrequenz eines Prozessors trägt 
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damit wesentlich zur Geschwindig- 
keit eines Rechners bei, das A und 
O ist sie aber noch lange nicht. 
Nehmen wir ein Beispiel: Auf dem 
Markt der 8 Bit-Maschinen gilt und 
galt der Genie Ills mit einem 

8 MHz-Prozessor Z80 als einer der 
schnellsten Rechner. Dennoch hat 
er gegen einen IBM AT mit 

80286 Prozessor, 6 MHz getaktet, 
keine Chance. Warum? Weil der 
80286 in einem Schritt eine 16 
Bit-Adresse/Zahl einlesen und eine 
32 Bit-Zahl intern berechnen kann, 
wohingegen der Z80-Prozessor für 
diese Operationen, wie bereits er- 
wähnt, einige zeitraubende Zwi- 
schenschritte unternehmen muß. 
Ein Z80-Prozessor mit 16 oder 

24 MHz Taktfrequenz würde es 
mit einem 80286 der AT-Klasse 
durchaus aufnehmen können. 
Aber: Die handelsüblichen Z80- 
Bausteine würden schon bei einer 
Taktrate von 10-12 MHz begin- 
nen, durchzuschmelzen. Die weit- 
verbreitete Taktquote für diesen 
Chip liegt bei 4 MHz. Gegenüber 
diesen ist der Genie IIs damit um 
den Faktor 2 in der Verarbeitungs- 
geschwindigkeit überlegen. 


PROZESSORSPEICHER 


Der Zugriff einer CPU (Central 
Processing Unit, Zentraleinheit= 
der Mikroporzessor) auf den Haupt- 
speicher eines Computers benötigt 
relativ viel Zeit. (Die großteils 
verwendeten dynamischen RAM’s 
benötigen zur Speicherorganisation 
die sogenannte Refreshzyklenzeit. 
Diese muß bei Zugriffen des Pro- 
zessors berücksichtigt werden.) 
Zur Einsparung dieser zeitrauben- 
den Angelegenheit entwickeln ame- 
rikanische, japanische und deut- 
sche Unternehmen einen Prozessor, 
der 50 oder 60 Bytes Speicher ein- 
lesen kann und somit Maschinen- 
schleifen enorm beschleunigt. 
(Beispiel: Ein Programmierer will 
eine Reihe von 6 Werten durch ei- 
nen vorher eingegebenen Berech- 
nungszyklus manipulieren. Hierfür 
hat er sich eine Befehlsroutine in 
Länge von 12 Bytes geschrieben. 
Die Routine wird vom Prozessor 
komplett mit den 6 Werten einge- 
lesen. Für die weiteren Berech- 
nungen wird kein weiterer Zugriff 
auf den langsamen Hauptspeicher 
benötigt; die Berechnung wird da- 
mit um den Faktor 10 beschleu- 
nigt. Erst das Zurückschreiben 

der errechneten Werte in den 
Hauptspeicher benötigt wieder die 
“‘normale“ Zeit.) In der weiteren 
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Entwicklung werden die Prozesso- 
ren bald bis zu einem KByte an 
Daten aufnehmen und berechnen 
können. Der Geschwindigkeits- 
vorteil, dem diese Entwicklung zu- 
grunde liegt, ist enorm. 


“PIPELINE”-TECHNIK 


Schon seit geraumer Zeit wird die 
“Pipeline“-Technik benutzt. Prozes- 
soren, die mit dieser Methode der 
Verarbeitung ausgestattet sind, 
erreichen einen Geschwindigkeits- 
vorteil von ca. 30 Prozent. 

Er wird dadurch bewirkt, daß die 
CPU die nächsten Daten einliest, 
während sie die alten noch bearbei- 
tet. Die CPU ist somit dauerbe- 
schäftigt, Leerzyklen entfallen. 


BEFEHLSSATZ 


Grundsätzlich sind alle Prozessoren 
in zwei Kategorien einteilbar: 

Die benutzerfreundlichen und be- 
fehlsreichen Zentraleinheiten und 
die befehlsarmen aber schnellen 
RISC-Prozessoren. Der Name RISC, 
frei übersetzt Prozessor mit redu- 
ziertem Befehlssatz, ist erst vor kur- 
zer Zeit ins Gespräch gekommen. 
Waren in der Vergangenheit die 
CPU-Hersteller darauf bedacht, mög- 
lichst viele Funktionen auf ihren 
Chip zu setzen, so haben vor allem 
die Engländer diese Idee umgekehrt 
und rüsten ihre Einheiten mit weni- 
gen, dafür aber sehr schnell zu bear- 
beitenden Funktionen aus. Stellen 
wir uns hierzu vor, daß Sie das Stich- 
wort “‘Computer“ haben und in ei- 
nem Lexikon nachschauen wollen, 
was sich unter diesem Begriff ver- 
birgt. Angenommen, Sie beginnen 
in einem Lexikon zu suchen, das 
1000 Eintragungen unter dem 
Buchstaben C besitzt. Dafür benöti- 
gen Sie die Zeit T, um Ihren Begriff 
herauszufinden. Jetzt stellen Sie 
sich vor, Sie suchen in einem Lexi- 
kon, das 10000 Eintragungen auf- 
weist. Sie werden in diesem Buch 
merklich mehr Zeit benötigen als in 
der kleineren Wissenssammlung 
(vorausgesetzt, Sie haben den Be- 
griff in beiden Ausführungen gefun- 
den!) Auf diesem Grundsatz baut 
die RISC-Technik auf. Je weniger 
Befehle, desto schneller wird die 
Funktion des Befehles gefunden 
und ausgeführt. Der Nachteil liegt 
dafür in der umständlichen Pro- 
grammierung der CPU. Kann der 
Anwender beispielsweise in der 
68000er CPU von Motorola eine 
Division zweier Zahlen mittels eines 
Befehls durchführen lassen, so muß 
er unter der Befehlssprache eines 


RISC-Chips eine eigene Divisions- 
routine schreiben! Dieser Umstand 
kostet natürlich Programmierzeit 
und Speicherplatz. 

Aus diesem Grund werden sich die- 
se Chips nur in Speziallösungen, also 
weniger im PC als vielmehr im 
Steuerungsaufgabenbereich, durch- 
setzen. Der Geschwindigkeitsvorteil 
ist auf jeden Fall unumstritten. 
(Meist werden die RISC-Bausteine 
darüber hinaus mit einer sehr hohen 
Taktfrequenz angeboten, was eine 
nochmalige Beschleunigung be- 
wirkt.) 
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FAZIT 


Die Geschwindigkeit eines Rechners 
hängt zwar nicht nur von der Verar- 
beitungsgeschwindigkeit seines 
Mikroprozessors ab (die Laufwerks- 
geschwindigkeit ist unter anderem 
ebenfalls ein sehr wichtiger Punkt!) 
ist aber dennoch einer der Haupt- 
gründe für dessen Zeitverhalten. Vor 
dem Kauf ist daher zu beachten, ob 
das System einen echten 16 oder 


32 Bit-Prozessor hat, ob dieser intern 


mehr Bit verarbeiten kann, mit wel- 
cher Taktrate er arbeitet und wel- 
chen Befehlssatz er zur Verfügung 
stellt. 

Ebenfalls interessant ist es zu wis- 
sen, ob sich die CPU der Pipeline- 
Technik bedient und ob er einen 
prozessoreigenen Speicher besitzt. 
Lassen Sie sich durch die verwirren- 
den Werbemethoden einiger Firmen 
nicht aus dem Konzept bringen und 
prüfen Sie ruhig einmal, wieviel 
Wissen Ihr Verkäufer über das von 
ihm angebotene System mitsamt 
Prozessor hat. m.w. 


Anzeige 


Sind Sie es leid, teure Programme zu kaufen, die dann nicht Ihren Ansprüchen gerecht werden, oder zuviel versprochen 
haben? 

Dann müssen Sie Mac Lin 2 Nucleus — den Programmgenerator — kaufen. Sie können mit Mac Lin 2 Nucleus selbstän- 
dig, schnell und indivuduell Ihre Programme selbst entwickeln, wie Sie es gerne möchten, sogar in der Relativ-Dateiver- 


waltung. 
Programmierkenntnisse sind keine Voraussetzung, denn die Eingaben erfolgen in deutsch und eine exzellente Bediener- 


führung führt Sie durch die einzelnen Programmebenen. 
Der Mac Lin 2 Nucleus kostet bei uns exklusiv für Sie 
Vielleicht interessiert Sie aber auch unser Komplettangebot: JOYCE PLUS PCW 8512 + Mac Lin 2 Nucleus 


zum Schlagereinführungspreis 


ACHTUNG: Mac Lin 2 Nucleous nun auch für den neuen Schneider 16-bit PC 


nur DM 450,00 


von nur DM 2.548,00 
nur bei uns für DM 850,00 


Händleranfragen erwünscht. 


COMPUTER 


JOYCE PLUS PCW 8512 DM 2.098,00 
CPC 464 + DDI-1 + Spielprogramme DM 1.198,00 
Der NEUE Schneider 16-bit Computer ist da, 
zu unseren Superpreisen: 
PC-1512 SD mit PC-MM DM 1.948,00 Disketten und Zubehör: 
PC- 1512 SD mit PC-CM DM 2.448,00 
PC-1512 DD mit PC-MM DM 2.448,00 
PC-1512 DD mit PC-CM DM 2.948,00 NAGAOKA 3°-Disketten CF2DD 10erPack DM 75,00 
PC-1512 SD mit HD 10-MM DM 3.448,00 NASHUA 3 1/2” Disketten MF 1DD 10er Pack DM 39,95 
PC-1512 SD mit HD 10-CM DM 3.948,00 NASHUA 3 1/2” Disketten MF2DD 10erPack DM 45,90 
PC-1512 SD mit HD 20-MM DM 3.948,00 NASHUA 5 1/4 Disketten MD 1D 10er Pack DM 9,90 
PC-1512 SD mit HD 20-CM DM 4.448,00 NASHUA 5 1/4° Disketten MD 2D 10er Pack DM 12,50 
alle angebotenen Disketten haben einwandfreie und geprüfte Qualität. 
Diskettenbox SS 50 für 30 3° od. 3 1/2” 
Disketten, abschließbar/tragbar, Rauchglas DM 19,90 
Diskettenbox DX 85 für 5 1/4” Disketten DM 19,90 
0° Ferdi’s Computer Software 0° 
® EDV-Service 2 


Höftestr. 32, D-4400 Münster-Angelmodde, Tel. (0251) 61 98 81 


Anfang des letzten Jahres lief ein 
Film in den deutschen Kinos, der 
die Kassen sämtlicher Kinobesitzer 
zum Klingeln brachte: — Ghost- 
busters —. Der Film war weltweit 
ein Hit. Selbstverständlich brachte 
es auch der Filmsoundtrack zur 
Nummer Eins in den hiesigen 
Charts. So durfte dann auch die 
Softwareindustrie nicht fehlen. Die 
Firma Activision brachte kurz nach 
dem Filmstart das Spiel Ghost- 
busters auf den Markt, das nun 
auch für den Schneider erhältlich 
1st. 

Nach dem Laden beginnt das 
Programm mit der Titelmelodie 
des Filmes, die hervorragend die 
Soundmöglichkeiten des Schneiders 
demonstriert. Während der Musik 
werden sogar die dazugehörigen 
Textzeilen eingeblendet (wahr- 
scheinlich zum Mitsingen!!). 

Wird der Vorspann abgebrochen, 
erscheint auf dem Bildschirm eine 
kleine Begrüßung und man wird 
nach seinem Namen gefragt. Hat 
man diesen eingegeben, muß man, 
falls man noch kein Konto besitzt, 
sich erst noch ein solches einrichten 
und bekommt von der Bank 10 000 
$ Startkapital zugewiesen. 


VIER AUTOS STEHEN 
ZUR WAHL 


Das nächste Bild nennt sich ‚‚Ve- 
hicle Selection“. Hier muß man sich 
ein Auto aussuchen, wobei vier zur 
Auswahl stehen. Diese unterschei- 
den sich in Geschwindigkeit, Bela- 
dungsmöglichkeiten und natürlich 
im Preis. Die Preise liegen hierbei 
zwischen 2000 und 15000 Dollar. 

Hat man sein Auto gekauft, ge- 
langt man automatisch in das näch- 
ste Bild, die Hilfsgeräteauswahl. 
Hier werden nützliche Geräte ange- 
boten, die einem beim Fangen von 
Gespenstern behilflich sind. Vor 
dem Kauf ist jedoch das sorgfälti- 
ge Studieren der Anleitung ange- 
bracht. 

Wenn man sein Geld dann ausge- 
geben hat, gelangt man durch Drük- 
ken von „E‘“ in den eigentlichen 
Spielanfang. 

Nun erscheint auf dem Bild- 
schirm ein Stadtplan, auf dem 
diverse Häuser und der Zuul Tempel 
(das ist das Geisterhauptquartier) 
eingezeichnet sind. 

Wenn nun plötzlich eines der 


TEST 


Häuser zu blinken beginnt, muß 
man sich schleunigst mit seinem 
Auto, das auf dem Stadtplan durch 
das Ghostbustersymbol verkörpert 
wird, zu diesem Haus begeben. 


HNO YOU GONNA 


N ı 


cALL? 


Ist dieses geschehen, wechselt er- 
neut das Bild und man befindet 
sich mit seinem Auto auf der Straße 
zu diesem Haus. Auf dieser Straße 
sollten schon so viele Geister wie 
eben möglich eingesammelt werden. 
Ist man angekommen, wird der 
Wagen automatisch an den Wegrand 
gelenkt und man kommt in das 
nächste Bild. Der nun zu sehende 
Geist sollte so schnell wie nur mög- 
lich gefangen werden. 

Die Schwierigkeiten bei diesem 
Spiel liegen darin, daß nach einiger 
Zeit der Marshmallow-Man er- 
scheint, der die Häuser zerstört. 
Wenn man dieses nicht verhindern 
kann, werden die Schäden vom 
Guthaben abgezogen. Gelingt es ei- 
nem, dieses Vorhaben zu vereiteln, 
bekommt man 2000 $ extra gut ge- 
schrieben. 
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Weiterhin leuchten nach gewisser 
Zeit immer mehr Häuser auf, die mit 
Geistern verseucht sind. Aber Vor- 
sicht! Dabei wird die Geisterener- 
gie der Stadt wesentlich erhöht. 
Schafft man es nicht, diese Energie 
unter Kontrolle zu bekommen, 
wird die ganze Stadt zerstört und 
eine neue Spielrunde kann begin- 
nen. 

Bei diesem wirklich sehr abwechs- 
lungsreichen Spiel kommt jeder auf 
seine Kosten. Es fällt durch seine 
sehr gute Grafik und seinen sehr 
guten Sound angenehm auf und 
hebt sich durch die ungewöhnliche 
Spielidee von allen anderen Spielen 
dieser Art ab. 


Hersteller: Activision 
Computer: CPC 464 
(Basler) 


TEST 


SPACE 
INVASION 


Space Invasion ist mal 
wieder eines von tausend 
Ballerspielen mit „Ram- 
bo“ Charakter: 

So ist man laut Spiel- 
beschreibung der knall- 
harte Kampfsoldat Super 
Joe, der versucht, die vor- 
dringenden Streitmächte 
zu besiegen. Nur mit ei- 
nem Maschinengewehr 
und sechs Handgranaten 
bewaffnet muß man so 
weit wie möglich in das 
feindliche Gebiet eindrin- 
gen. Dieses wird jedoch 
durch Minen, Granaten, 
Dynamit und feindliche 
Kugeln, die aus 
Richtungen kommen, .er- 
heblich erschwert. 

Weiterhin wird der 
Vormarsch von Super Joe 


allen. 


immer wieder durch 
feindliche Truppen, die 
plötzlich aus Höhlen her- 
vorkommen, zu stop- 
pen versucht. Mitleid darf 
auf keinen Fall gezeigt 
werden. Man muß immer 
weiter vordringen und 
versuchen, den feindli- 
chen Außenposten so viel 
Handgranaten wie mög- 
lich abzunehmen, bis 
man bei seinem endgülti- 
gen Ziel — der Festung 
— angekommen ist. 
Leider kann die sehr 
gute Soundprogrammie- 
rung des Spieles die einfa- 
che Spielidee und Gra- 
phik nicht auffangen. 
Hersteller: Elite 
Computer: CPC 464 
(Basler) 


Schmidt- 
Soft 


präsentiert: 


Das universelle Büro 
für den Joyce 8512 
Anwenderfreundlich, Menuegesteuert 


Alles auf einerDiskette 
für DM 19, — 
Händleranfragen erwünscht 


Schmidt-Soft Handelsgesellschaft mbH 
Blumenstr. 15, 5600 Wuppertal 1, 
Telefon 0202/432030 + 437743 


_ SERVICE 


RUFNUMMERN CPC-USER-CLUBS 


PLZ 1000 Berlin: 
PLZ 2000 Hamburg: 


Tel. 030/822 77 50 


. Tel. 040/540 14 24 


PLZ 2000 Hamburg: Nur Joyce!Tel. 040/491 75 54 


PLZ 2000 Hamburg: 
PLZ 2190 Cuxhaven 1: 


Tel. 040/693 20 33 


Tel. 04721/22 29 99 


Mailbox: 04721/62 600 


PLZ 2300 Kiel: 

PLZ 2320 Plön: 

PLZ 2390 Flensburg: 
PLZ 2400 Lübeck: 

PLZ 2908 Friesoythe: 
PLZ 2842 Lohne: 

PLZ 3000 Hannover: 
PLZ 3500 Kassel: 

PLZ 3590 Bad Wildungen: 
PLZ 4132 Kamp-Lintfort 
PLZ 4182 Uedem: 

PLZ 4193 Krankenburg: 
PLZ 4200 Oberhausen 1: 
PLZ 4280 Borkengemen 
PLZ 4800 Bielefeld: 


Tel. 0431/52 71 25 
Tel. 04522/46 43 
Tel. 0461/351 70 

Tel. 0451/49 1151 
Tel. 04491/26 14 

Tel. 04442/715 46 


- Tel. 0511/28 11 72 


Tel. 0561/10 38 05 
Tel. 05621/13 22 
Tel. 02842/6 09 25 
Tel. 02825/86 65 
Tel. 02826/54 70 
Tel. 0208/84 53 66 
Tel. 02861/5117 
Teo. 0521/88 79 70 


PLZ 4836 Herzebrock-Clarholz: Tel. 05245/6]. 20 


PLZ 4509 Dissen: 

PLZ 4630 Bochum 1: 
PLZ 4800 Bielefeld 1:‘ 
PLZ 4830 Gütersloh: 
PLZ 5010 Bergheim: 


PLZ 5132 Übach-Palenberg: 


PLZ 5138 Heinsberg 1: 
PLZ 5140 Erkelenz 4: 
PLZ 5400 Koblenz: 

PLZ 5630 Remscheid: 
PLZ 5630 Remscheid: 
PLZ 6300 Gießen: 

PLZ 6330: Wetzlar: 

PLZ 6352 Ober-Mörlen: 
PLZ 6382 Friedrichsdorf: 
PLZ 6600 Saarbrücken: 
PLZ 6800 Mannheim 
PLZ 6927 Bad Rappenau: 
PLZ 7000 Stuttgart 1: 
PLZ 7063 Welzheim: 
PLZ 7129 Talheim: 


PLZ 7129 Neckarwestheim: 


PLZ 7250 Leonberg 6: 
PLZ 7311 Hochdorf: 
PLZ 7420 Münsingen: 
PLZ. 7500 Karlsruhe: 
PLZ 8580 Bayreuth 
PLZ 7600 Offenburg: 
PLZ 7800 Freiburg/Br.: 
PLZ 7894 Stühlingen: 
PLZ 7909 Dormstadt: 
PLZ 8000 München: 
PLZ 8156 Otterfing: 
PLZ 8201 Schechen: 
PLZ 7520 Bruchsal 
PLZ 8670 Hof/Saale: 
PLZ 8900 Augsburg: 
PLZ 8941 Erkheim : 


PLZ 8998 Lindenberg/Allgäu 


A 1020 Wien/Austria: 


Tel. 05421/51 83 
Tel. 0234/59 65 04 
Tel. 0521/88 79 70 
Tel. 05241/36 350 
Tel. 02271/6 17 75 
Tel. 02451/4 66 08 

Tel. 02452/57 10 

Tel. 02435/25 18 

Tel. 0261/7 11 69 
Tel. 02191/6 51 21 
Tel. 02191/6 85 71 

Tel. 0641/4 32 87 
Tel. 06441/4 86 52 

Tel. 06002/396 
Tel. 06172/7 93 55 


Tel. 0681/302 20 98 


Tel. 0621/10 34 61 
Tel. 07264/77 02 
Tel. 0711/76 69 42 
Tel. 07182/21 92 
Tel. 07133/67 99 
Tel. 07133/62 07 
Tel. 07152/2 18 82 
Tel. 07153/5 82 79 
Tel. 07381/29 47 
Tel. 0721/47 22 73 
Tel. 0921/4 17 48 
Tel. 0781/7 82 68 
Tel. 0761/89 14 48 
Tel. 07744/50 02 
Tel. 07348/2 26 38 
Tel. 089/570 14 31 
Tel. 08024/24 10 
Tel. 08039/32 37 
Tel.: 07251/1 49 20 
Tel.: demnächst 
Tel. 0821/57 38 73 
Tel. 08336/7105 
Tel. 08381/74 68 
Tel. Wien / 2 63 60 
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DATEI- VERWALTUNGEN 
OHNE RELATIV-DATEIEN 


Mit diesem dritten Teil des Testes von vier verschiede- 
nen Dateiverwaltungen schließt unsere kleine Test- 
reihe ab. Der Autor bewertet die einzelnen Program- 
me und hat sich für eine Software entschieden. 


7. Ausdruck der Daten 


Für mich ist dies der 
wichtigste Punkt. Hier ist 
die Schnittstelle zu den 
Menschen, die: ich mit 
dem Produkt meines Pro- 
grammes konfrontiere, 
und da muß es zeigen, 
was es kann. Die Daten 
sollen, wenn möglich auf 
sehr komfortable Weise, 
nach meinen Wünschen 
aufbereitet und verarbei- 
tet werden.Die Ausgabe 
erfolgte auf einem EP- 
SON RX 80, EPSON LX 
90 (Schneider-Interface) 
und EPSON FX-85. 


DATA464 


Für mich nicht über- 
raschend ist, daß in einer 
so kurzen Dateiverwal- 
tung kein superkomfor- 
tabler „Listoutputgenera- 
tor‘‘ enthalten sein kann, 
und so bin ich letztend- 
lich doch mit dem zufrie- 
den, was ich als Listaus- 
abe. erhalte, auch wenn 
ich auf die Gestaltung 
keinen Einfluß habe. Ich 
kann lediglich bestim- 
men, ob ich die gesamte 
Datei, oder nur einzelne 
Datensätze, listen 
möchte. Sie sehen schon, 
eine gezielte Ausgabe von 
vorsortierten (selektier- 
ten) Daten ist nicht mög- 
lich. Die Druckausgabe 
ist schlicht, aber zweck- 
mäßig. Es wird die Daten- 
satznummer ausgegeben, 
dann zeilenweise die 
Feldbezeichnung und der 
Feldinhalt. Die Sätze sind 
durch Leerzeilen getrennt. 
Der Druck kann nicht un- 


‘ohne 


terbrochen werden, er- 
folgt aber sehr schnell. 
Im Listing befindet sich 
eine  Papierwechselmel- 
dung, die aber aufgrund 
logischer Fehler nicht 
funktioniert (ist auch 
nicht notwendig) 

+ Ausgabe einzelner Sät- 

ze oder Gesamtdatei 


+ Zweckmäßige Druck- 
ausgabe 

— Kein Einfluß auf das 
Ausgabeformat 

— Keine Unterbrechungs- 
möglichkeit beim 
Druck 

SCHNEIDERDATEI 


Auch hier ist die Druck- 
ausgabe relativ trivial ge- 
halten worden. Einzig, 
ich kann entscheiden, ob 
ich die Ausgabe mit oder 
Feldbezeichnung 
wünsche. Das Ergebnis ist 
aber nicht unbedingt be- 
friedigend. Es fehlt prin- 
zipiell die Satznummer, 
so daß ich überhaupt 
nicht weiß, um welchen 
Datensatz es sich handelt. 
Außerdem werden die 
Sätze beim Einzeldruck 
immer ohne Leerzeilen 
ausgegeben, was man 
einfach nicht akzeptieren 
kann. Will man die Feld- 
bezeichnungen nicht im 
Ausdruck haben, so wird 
der Feldinhalt nicht etwa 
linksbündig ausgegeben, 
sondern in der Textlänge 
der Feldbezeichnungs- 
wünsche. Das Ergebnis ist 
aber nicht unbedingt be- 
friedigend. Es fehlt prin- 
zipiell die Satznummer, 
so daß ich überhaupt 
nicht weiß, um welchen 


Datensatz es sich handelt. 
Außerdem werden die 
Sätze beim Einzeldruck 
immer ohne Leerzeilen 
ausgegeben, was man ein- 
fach nicht akzeptieren 
kann. Will man die Feld- 
bezeichnungen nicht im 
Ausdruck haben, so wird 
der Feldinhalt nicht etwa 
linksbündig ausgegeben, 
sondern in der Textlänge 
der Feldbezeichnung wer- 
den Leerzeichen gedruckt 
(???). Ein Abbruch des 
Druckes ist auch nicht 
möglich. 
+ Ausgabe einzelner Sät- 
ze oder Gesamtdatei 
— Ausgabeformat unbe- 
friedigend 
— Keine Unterbrechungs- 
möglichkeit beim 
Druck 


MULTIDATEI Data 
Media - 


Auch in diesem Bereich 
sind die Leistungen des 
Programmes nicht berau- 
schend. Mir ist es leider 
nie gelungen, mehr als 1 
Datensatz auszugeben, 
danach ‚starb‘ das Pro- 
gramm; es hängte sich 
einfach auf und war mit 
keinem Tastendruck zur 
weiteren Arbeit zu be- 
wegen. Und dieser eine 
Datensatz wird ohne Än- 
derungsmöglichkeiten 

ausgegeben, und zwar die 
ganze Maske, mit Erklä- 
rungen und Texten. Wer 
nun glaubt, daß eine klei- 
ne Maske weniger Platz 
braucht ... ist nicht. Der 
Bildschirminhalt (außer 
den Funktionszeilen) 
wird ausgegeben, im 
Zweifelsfall mit vielen 
Leerzeil.... Das kostet 
nicht nur Papier, son- 
dern auch Zeit. Zur Aus- 
gabe kommt man sowie- 
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so nur nach einer Suche 


] 

Nach der. ersten 
Ausgabe stirbt das Pro- 
gramm 

— Keinem Einfluß auf 
die Gestaltung der Aus- 
gabe 
— Kein eigener Menue- 
punkt 

— Sehr langsame Ausgabe 


MULTIDATEI Rainbow 
Arts 


Hier zeigt das Programm 
wieder seinen ursprüngli- 
chen Stellenwert. Was bei 
einer Datenausgabe die- 
ser Klasse überhaupt alles 
möglich sein kann, wird 
mir vorgeführt. Nach 
Auswahl des Punktes 
kann ich mit „Liste‘“ die 
Ausgabe auf den Bild- 
schirm oder mit „Druck“ 
auf den Drucker legen. 
Jetzt habe ich die Aus- 


wahl zwischen zeilen- 
weiser Listenausgabe und 
mehrzeiligem Daten- 


druck. Der Datendruck 
bietet folgende änderbare 
Parameter an: 


j 
[Modus Druck 7 Te} 


SB Druck 


Erster zu druckender Ds... i 
Letzter zu druckender Ds.. 7 
Wie oft wird Ds gedruckt... 1 
Tabulator.vseesnenennenncn 8 
Abstand zwischen Ds....... 2 
Anzahl Exemplare. .sarsenns 1 
Eingabemaske drucken. ..... Ja 
Ds-Nummer drucken, „se 222: Ja 
doppelter Zeilenahstand... ne 


Die Parameter können 
nach dem Ändern gespei- 
chert und zur Wiederver- 
wendung geladen werden. 
können auch noch einge- 
Parameter auf, dann kann 
ich noch bestimmen, 
welche Felder nicht ge- 
druckt werden (!!), 


= Listendruck 
Faraneter BEM aendern EB: 


eichern 


womit auch die 
Erstellung von Adreßeti- 
ketten erschlagen wäre. 
Sie können also nicht nur 
auf individuellste Weise 
Ihre Daten zum ‚Aus- 
druck“ bringen, sondern 
können auch noch einge- 
fügte Felder wie: Bemer- 
kungen, persönliche Da- 
ten usw. unterdrücken. 
Haben Sie aber den 
„Listdruck“ angewählt, 
werden Ihnen alle Feld- 
bezeichnungen, die zu 
dieser Datei gehören, an- 
gezeigt und Sie geben 
nun die Feldnummer und 
die Anzahl auszugeben- 
der Stellen ein; dabei zeigt 
das Programm am Zeilen- 
ende die noch verblei- 
bende Spaltenanzahl an 
(!). Sie können so in ei- 


ner Zeile eine Datenaus- 


gabe nach Ihren Wün- 
schen zusammenstellen. 
Zum Schluß geben Sie Ih- 
rer Liste noch eine tref- 
fende Überschrift und 
speichern die Parameter- 
werte ab, um sich beim 
nächsten Mal die Eingabe 
zu ersparen. 
+ Ausgabe im Listen- 
oder Datensatzformat 
+ Ausgabeparameter ver- 
änderbar, ladbar, spei- 
cherbar 
+ Bestimmte Felder kön- 
nen bei der Ausgabe 
unterdrückt werden 


ter Ds: 77 1 ? - Hauptmenue | 


ER laden 


+ Überschrift kann ge- 
setzt werden 

+ Jede beliebige Ausgabe 
möglich (Adressetiket- 
ten usw.) 

+ Druck kann gestoppt 
werden. 

Ich habe nun alle. mir 

wichtig erscheinenden 

Funktionen der Pro- 

gramme getestet. Bevor 

ich mir Sonderfunktio- 

nen ansehe, möchte ich 

eine schnelle Zwischen- 

bewertung durchführen, 

wobei der Wert 10 nicht 


TEST 


unbedingt die optimale 
Funktion darstellen muß, 
sondern sie ist einfach die 
Beste der 4 Kandidaten. 


6. Extras 


DATA-464 

Dieses Programm mit sei- 
nen 7 KB und den schon 
erstaunlich guten Funk- 
tionen kann verständli- 
cherweise keine weiteren 
Extras mehr beinhalten 
(Hätte mich auch sehr ge- 
wundert). 


SCHNEIDERDATEI 


Als einziges Extra und als 
einziges Programm bietet 
die SCHNEIDERDATEI 
deutsche Umlaute. Über 
den Sinn von Umlauten 
in Dateiverwaltungen 
kann man sicher geteilter 
Meinung sein. Ich bin der 
Ansicht, sie gehören 
nicht hinein, auch wenn 
der Dr. Müller nun mit 
„ue” geschrieben werden 
muß. Warum? Die Sortie- 
rung (dieses Programm 
besitzt keine Sortierrou- 
tine???) leidet gewaltig 
darunter, da unsere Um- 
laute (ae, oe, ue, ss) ei- 
gentlich Sonderzeichen 
„AöUUüÖ” usw. sind. Und 
so werden sie auch be- 
handelt. Ein Ausdruck, 
der mit „AE” beginnt, 
wird bei der Sortierung 
ganz hinten stehen, weil 
der ASCII-Wert für „AE” 
eben 91 ist und somit 
noch hinter dem „Z” 
mit 90 steht. Und wenn 
schon Umlaute, dann 
richtig und nicht para- 
doxerweise die kleinen 
Umlaute auf den Tasten 
mit SHIFT und die gros- 
sen ohne SHIFT, und 
dann noch nicht auf den 
gleichen Tasten (die so- 
wieso nicht der DIN- 
Norm entsprechen). Bes- 
ser vergessen und ohne 
Umlaute arbeiten. 


MULTIDATEI 
DATA MEDIA 


Viele Extras kann ich 
nicht bei dem Programm 


finden (aufgrund meiner 
schlechten Erfahrungen 
bin ich bei der Suche 
auch sehr oberflächlich), 
einzig: 

CATALOG bei dem der 
Diskettenin- 
halt ange- 
zeigt wird. 
Man hätte 
die Anzeige 
aber ruhig 
in ein WIN- 
DOW einbin- 
den können, 
denn wenn 
der Inhalt 
nicht auf 
den Bild- 
schirm paßt, 
schiebt er 
die Kopfzei- 
le aus dem 
Bild. (?) 

gibt nach 
der Eingabe 
„Wieviel Zei- 
chen bei den 
Textfeldern 
erwartet 
werden” die 
maximale 
Anzahl Da- 
tensätze be- 
kannt. 


CTRL+ 


MULTIDATEI 
RAINBOW ARTS 
Extras, ein Punkt, für den 
diese Programm gerade 
erfunden zu sein scheint. 


"Beginne ich nur mal im 
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Hauptmenue: 


a) alle Eingaben (Laden/ 
Sichern/Parameter/ 
Feldinhalte) werden 
wenn möglich vom 
Programm vorgeschla- 
gen. 

b) Rechnung. Nach Ein- 
gabe des ersten (“1” 
wird vorgeschlagen) 
und des letzten Daten- 
satzes und des Feldes 
(mit numerischen Wer- 
ten gefüllt), wird das 
Gesamtergebnis ‚aus 
der Addition der Fel- 
der mit der Meldung: 
„Feld Nr. x aus Ds bis 
Ds x ergibt addiert 
xxx” ausgegeben. Ich 


hole mir damit den Ge- 


samtwert meiner 
Münzsammlung, oder 
das Durchschnittsalter 
einer selektierten 
Adressmenge usw. 


c) Säulengrafik. Sie geben 
den ersten (‘“1” wird 
vorgeschlagen) Daten- 
satz und das numerisch 
gefüllte Feld an, und 
schon werden Ihnen 
die Feldinhalte der er- 
sten 25 Datensätze als 
Balkendiagramm (Bal- 
kenhöhe im Verhältnis 
max/min der Feldin- 
halte) ausgegeben. 
Rechts daneben wird 
der Feldinhalt noch 
einmal als Zahlenwert 
dargestellt. Die Fuß- 
zeile zeigt die mögliche 
Auswahl (“1+” die 
nächsten 25, “2-” die 
letzten 25 Datensätze 
werden angezeigt, 
„3neu” man kann eine 
neue Grafik aufbauen, 
“” ”Rücksprung zum 
Menue). 


So, gleich wechsle ich 
mal mit “2” ins Disket- 
tenmenue. Es erwartet 
mich der gleiche Menue- 
aufbau wie im Hauptme- 
nue, aber folgende Öptio- 
nen: 


a) Inhaltsverzeichnis 
zeigen 
Cat-Funktion mit An- 
zeige des freien Spei- 
cherplatzes. Irgendei- 
ne Taste führt zum 
Diskettenmenue, “"” 
zum Hauptmenue zu- 
rück. 

b) Datei löschen 
Auch Programme kön- 
nen nach Eingabe des 
Namens gelöscht wer- 
den. 

c) Umbenennen von Da- 
teien 
Alten und neuen Na- 
men eingeben, und 
schon werden Dateien 
und Programme umbe- 

nannt. 

d) Ein/Ausgabegerät wäh- 
len, 


an- 


man kann den Daten- 
recorder oder das Dis- 
kettenlaufwerk als Ein- 
oder Ausgabegerät de- 
finieren. Für mich sehr 
praktisch für die Siche- 
rungskopien, die ich 
auf Kassette speichere. 


e) Diskette löschen 
Löscht nach einer Si- 
cherheitsabfrage alle 
Daten einer Diskette. 

f) Diskettenstation wäh- 
len 
Konnte ich nicht te- 
sten, da ich kein zwei- 
tes Diskettenlaufwerk 
besitze. Beim Anwäh- 
len kann man zwischen 
den Laufwerken ,„A” 
und ‚„B” wählen. 

g) alle ”.BAK”-Files lö- 
schen (!!!) 


TEST. 


Ein wunderbarer 

Punkt. Der Computer 
erstellt von jeder zu 
speichernden Datei ei- 
ne Sicherungskopie 
mit der Extension 

„BAK“, sofern sie 
schon einmal vorhan- 


den war. Das kostet 
natürlich unwahr- 
scheinlich viel .Spei- 
cherplatz. Deshalb ist 
es notwendig, regel- 
mäßig unter den Da- 
teien aufzuräumen, 
und dieser Menue- 
punkt hilft dabei unge- 
mein (er würde auch 
anderen Programmen 
gut zu Gesicht stehen). 
h) Usernummer wählen(!) 
Man kann eine Anwen- 
dernummer zwischen 0 


und 15 wählen. Vor- 
teil: Jeder, der mit die- 
sem Programm arbei- 
tet, kann sich einen ei- 
genen Bereich auf der 
Diskette für seine Da- 
teien schaffen, ohne 
auf die des Anderen 


l. 
B: 
3. 
4. 
5. 
6. 
T. 
8. 
J. 
1 


 DaTEr LoESCHEN | 
U DATEı UMBENENNEN | 
DEin-/Aussabeseraet einstellen | 
Diskette Ioeschen | 
Laufwerk wachen 
alle ‚BaK-Files locschen | 
üsernummer wachlen | 
em Hauptmenus ME Diskmenue 


versehentlich zugreifen 
zu können. So sind 
auch gleiche Namen 
für die Dateien in den 
verschiedenen Berei- 
chen möglich. 


Anmerkung: 

Bei den Kassettenoperati- 
onen ist es mir einal ge- 
lungen, einen „Unknown 
Error” zu erzeugen und 
das Programm zum Ab- 
bruch zu bringen 
(BREAK bei Save oder 
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Load). Eine Wiederho- 
lung dieses Fehlers war 
nicht möglich, und insge- 
samt muß ich diesem Pro- 
gramm auch die beste Da- 
tensicherheit des Testes 
bescheinigen. 


Abschließendes persönli- 
ches Urteil: 


DATA464 


Hinter dem recht kurzen 
Programm, welches ja der. 
Datenmenge zugute 
kommt, verbergen sich 
für die Grundfunktionen 
einer Dateiverwaltung 
doch sehr leistungsfähige 
Routinen, und wer sich 
an die einfache Druckaus- 
eabe gewöhnen kann 
weil er vielleicht keinen 
Drucker hat oder nur on- 
line arbeitet), und wen 
der zwar augenfreundli- 
che aber nicht immer 
zweckerfüllende Modus 1 
(40 Zeichen) nicht stört, 
hat für wenig (kein) Geld 
ein ausreichendes Pro- 
gramm, das schon in vie- 
len Bereichen zufrieden- 


stellen kann. Einzig 
Selbstdisziplin bei der 
Multidatei Rainbow — die 


beste im Test 


Eingabe ist gefragt, oder 
eine noch zu erstellende 
Fehlerroutine. 


SCHNEIDERDATEI 


Auch dies ist ein Pro- 
gramm, das den Anwen- 
der zufriedenstellt, der 
keine allzu großen An- 
sprüche hat. Störend für 
mich ist die fehlende Sor- 
tierroutine bei 18 KB 
Speicherplatz. Dafür 
glänzt das Programm mit 
einer ausgezeichneten 


TEST 


Bildschirmdarstellung in 
den einzelnen Funktio- 
nen, einzig: Der Druck 
könnte besser sein. Doch 
einem geschenkten Gaul 
schaut man nicht 
Aber hier noch eine Feh- 
lerroutine eingebaut, und 
man kann damit arbei- 
ten. 


MULTIDATEI 
DATA MEDIA 


Tja, was soll ich sagen. In 
diesem Programm geben 
sich eine Menge guter 
Ideen und eine Menge 
Fehler die Hand. Die gut 
durchdachte Maskendefi- 
nition, die so uneffektiv 
ausgenutzt wird, die 
nicht prüfbare Druckaus- 
gabe, die unverständliche 


Funktionsbezeichnungen . 


usw. verhindern, daß die- 
ses Programm als benutz- 
bar oder sogar empfeh- 
lenswert bezeichnet wer- 
den kann. Noch nicht 
einmal die Hilfe der Ver- 
triebsfirma ist annähernd 
ausreichend. Alles in Al- 
lem: Ich kann mir eine 
Arbeit mit diesem System 
nicht vorstellen, dabei 
bin ich glücklicherweise 
noch in der Lage, mir bei 
den Fehlern durch Eigen- 
arbeit am Programm zu 
helfen, aber der unbe- 
darfte Anwender? 


MULTIDATEI Rainbow 
Arts 


Ich muß mich zurückhal- 


ten, um mit der Beurtei- 
lung wenigstens annä- 
hernd auf dem Teppich 
zu bleiben. Das Programm 


überzeugt (wäre doch 
diese lange Sortierzeit 
nicht!). Der Anwender 
bekommt viel Programm 
für sein Geld, soviel, daß 
das Preis/Leistungsverhält- 
nis als hervorragend be- 
zeichnet werden kann. 
Alle Funktionen mit dem 
notwendigen Komfort, 
eine „Spitzendruckaus- 
gabe“, sehr viele nützliche 
Extraroutinen haben 
mich bewogen, meine ge- 
samten Dateien auf dieses 
System umzustellen. Da- 
bei gibt es zwischenzeit- 
lich schon den anfangs 
erwähnten Nachfolger 
EMS, der die Leistungs- 
daten um 100 % noch 
übertreffen soll (ist es 
möglich?). Aber mit dem 
Folgeprogramm kann der 
Datenrecorderanwender 
wahrscheinlich nichts an- 
fangen, so daß diese Ver- 
sion sicher ihre Freunde 
unter den CPC-Usern fin- 
den wird. 


Abschließende 
kung des Autors: 


Bemer- 


Alle Abbildungen sind 
Original-Hardcopys der 
Programme. Getestet 
wurden die Programme 
auf dem Schneider CPC 
464 mit externem Dis- 
kettenlaufwerk DDI-1. 
Joystick und Sterokabel 
waren angeschlossen. Die 
einzelnen Programme 
sind alle mein Eigentum 
(keine Prototypen oder 
zur Verfügung gestellte 
Versionen), die sich na- 
türlich weiterhin in mei- 
nem Besitz befinden und 
jederzeit zugänglich sind. 


hat mich fast vollständig (Udo Maass) 
SCHNEIDER- 

MD MD SCHNEIDER- 
Funktion Fakt. Data Media Rainbow Arts DATEI DATA464 
Handbuch 3 6=18 10 = 30 1= 3 1= 3 
Maske erst. 4 4=16 10=40 6=24 8=32 
Laden/Sich. 1 6= 6 10.= 10 8= 8 8= 8 
Dateneingabe 4 2= 8 8=32 10 = 40 8=32 
Aend/Loesch 3 6=18 10 = 30 6=18 2=6 
Suchen 2 4= 8 10=20 4= 8 8=16 
Sortieren 3 6=18 4=12 0=0 8=24 
Ausgabe 4 2=8 10=40 4=16 4=16 
Summe 100 214 117 137 


SERVICE 


1.Die Assembler MAC 
und RMAC erzeugen bei 
den files. PRN und .XRF 
in der ersten Zeile — 
beim file.XRF auch in 
einer der letzten Zeilen 
— das Zeichen ‘“ "L‘“. Da- 
durch wird beim Aus- 
drucken dieser Program- 
me ein Seitenvorschub 
hervorgerufen, der zu 
einer erheblichen Papier- 
verschwendung führt; we- 
nigstens beim Drucker 
DMP-2000 ist das der 
Fall. Dieses Vorschubzei- 
chen ist bei der Bild- 
schirmausgabe mittels 
TYPE file.PRN usw. 
nicht sichtbar. Erst wenn 
man das Programm mit 
ED file.PRN editiert, 
kann man dieses Zeichen 
erkennen. 

Dieser Seitenvorschub 
kann verhindert werden, 
wenn man zum Aus- 


nennung liefert den eng- 

lischen Zeichensatz. 
Ferner muß beachtet 

werden, daß 

a) die Diskette, auf der 
das CP/M- und das 
PROFILE . SUB -Pro- 
gramm gespeichert ist, 
nicht schreibgeschützt 
sein darf. 

b)alle in PROFILE.SUB 
angeführten Hilfs- oder 
Unterprogramme eben- 
falls auf der Diskette 
gespeichert sein müs- 
sen. 

c)auch das Programm . 
SUBMIT.COM, sowie 
alle zum Aufruf der 
selbst erstellten Unter- 
programme _ erforderli- 
chen Hilfsprogramme, 
wie SETKEYS, SET- 
LST, SETDEF, DE- 
VICE usw. ebenfalls 
auf der Diskette zu fin- 
den sein müssen, wenig- 


TIPS& 


TRICKS: 


drucken dieser Program- 


me PIP.COM verwendet: 
PIP LST:=file.PRNAÄFÜ 
bzw. 


PIP LST:=file.XRFÄFÜ 

Ä und Ü bedeuten 
‚eckige Klammer auf und 
zu‘. Will man gleichzeitig 
eine Bildschirmausgabe 
erreichen, so muß man 
als Parameter die Zei- 
chen ‘FE‘ zwischen ek- 
kige Klammern setzen. 

2. Im CPC-6128-Hand- 
buch steht in Kapitel 4, 
Seite 3, daß män durch 
Umbenennung des Sy- 
stemdisketten-Programms 
PROFILE.ENG in PRO- 
FILE.SUB auf die deut- 
schen Schriftzeichen 
(Language 2) umschalten 
könnte. Das stimmt aber 
nicht, denn diese Umbe- 
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stens, wenn nur ein 
Diskettenlaufwerk zur 
Verfügung steht. 
Hier ist also eine Menge 
zu beachten. Beispiels- 
weise können mittels 
PROFILE.SUB aufgeru- 
fen werden: 
PALETTE 50,0 
SETKEYS KEYS.CCP 
SETKEYS KEYS.DEU 
DEVICE CONSOLE äCO- 
LUMNE>=80ü 
SETDEV äNOPAGEü 
SETLST DRUCKER.DEU 
LANGUAGE 2 
DATE SET 
CLS.COM 
DATE C 
Die Programme DRUK- 
KER.DEU. KEYS.DEU, 
CLS.COM sind Eigenpro- 


BRaImIe, Benker 
8011 Höhenkirchen 


Dieser dritte Teil der zwei- 
ten Folge des ersten 
Computerkurses beendet 
das erste Kapitel über Pe- 
ripheriegeräte und be- 
handelt als letztes die 
Festplatte, bevor in der 
nächsten Folge, der zwei- 
ten Lektion der Periphe- 
rie usw. usw. Und damit 
wären wir auch schon 
beim Thema, das ich heu- 
te aus dem Werbefernse- 
hen und hier speziell von 
Frau Sommer übernom- 
men habe: ‚Zum Feste 
das Beste, je härter je 
lieber”. 

Die Festplatte ist ei- 
ne mit der Schlachtplat- 
te verwandte Mahlzeit. 
Ihre häufigste Anwen- 
dung liegt bei Betriebsfe- 
sten und familiären Or- 
gien, etwa der Silber- 
hochzeit von Tante An- 
neliese. Da die Festplatte 
meist von Fremdanbie- 
tern hergestellt und aus- 
geliefert wird, empfiehlt 
es sich für den Gastgeber, 
die teuren Lachsbrötchen 
vor Eintreffen der Gäste 
gegen Thunfischsemmeln 
zu tauschen. Auf diese 
Weise kann man nicht der 
vorsätzlichen Verschwen- 
dung an Dritte oder Gä- 
ste bezichtigt werden. 
Zur Bewältigung des Ge- 
lages ist Sekt (auch hier 
kann mit Limonadenver- 
schnitt gespart werden) 
oder Faßbier das Übliche. 

Computeranwender wie 
unsereiner können mit 
derartig ausgefeilten Ge- 


nüssen nichts anfangen. 


Traditionsgemäß — man 
denke da an Silikon Val- 
ley — ernährt sich der bit- 
bewußte Mensch von 
Hamburgern und Pom- 
mes, eben von Big Macin- 
tosh’s und dem maxima- 
len Vitaminschock eines 
Apfels. Allerdings war die 
Festplatte der eigentliche 
Anlaß zur Entwicklung 
der Harddisc und die wie- 
derum interessiert den 
User ungemein. Aus der 
Historie ist folgendes 
überliefert: 


GLOSSE 


WIE IBM DIE 
FESTPLATTE 
ERFAND 


Zuerst die Beantwortung der Fragen aus der letzten 
Folge: Frage A, „Welche Diskettenbefehle sind mög- 
lich”, hängt im wesentlichen davon ab, ob man über- 
haupt eine besitzt, also Antwort vier ankreuzen (nicht 
vorhanden). Wer auf Frage B, „Was ist Format’’, nicht 
zu antworten vermag, läßt es besser. Von Frage C, 
„Wer leiht mir zehn Mark’, war ich enttäuscht. Keine 
einzige richtige Antwort, das stelle man sich mal vor! 


Der jährlichen Verlei- 
hung des goldenen Toilet- 
tenschlüssels für verdiente 
Mitarbeiter wollte der da- 
malige IBM-Manager Os- 
kar Kokoschinsky einen 
würdigen Rahmen verlei- 
hen. Er bestellte bei sei- 
ner Sekretärin aus diesem 
Grunde eine Festplatte 
mit Hamburgern. Seine 
Schreibkraft (Spitzname: 
Ach du liebes Lottchen) 
war dem Bürostreß noch 
nicht ganz gewachsen 
und orderte eine Fest- 
platte und (!) Hambur- 
ger. Die Fleischklöpps- 
chen waren ja schnell ge- 
bracht, aber die Entwick- 
lungsabteilung des Hauses 
IBM rätselte lange, was 
der Boss denn mit 
„FESTPLATTE meinte. 
Die Reinigungskraft gab 
den Ingenieuren mit den 
Worten „Macht halt ir- 
gendwas für’n Computer” 
die entscheidende Denk- 
richtung. 


KURZES EXPERIMENT 


Was daraus entstand, 
ist die Folge unseres heu- 
tigen Kurses. Nur soviel 
sei noch gesagt, daß die 
Verleihung des goldenen 
Toilettenschlüssels aus- 
fiel, weil Oskar Koko- 
schinsky sehr erbost war, 
Hamburger von Papptel- 
lern essen zu müssen. So 
müssen verdiente IBM- 
Mitarbeiter noch heute 


über die Straße bei Apple 
klingeln, wenn’s man 
dringend ist. 

Zu Beginn und zur 
Entspannung ein kurzes, 
aber schmerzloses Experi- 
ment zur Erläuterung der 
Harddisc. 

Nehmt einmal einen 
Besenstiel, es darf ruhig 
der Sonntagsbesen sein, 
und kauft 5 Disketten 
vom Format Fünfeinvier- 
tel Zoll. Ignoriert erst 
einmal diesen dummen 
Verkäufer, der Euch 
fragt, was Ihr mit dem 
Besen im Laden wollt. Da 
Ihr es selbst nicht wissen 
könnt, lauft schnell nach 
Hause und lest weiter. 

Den flotten Feger hät- 
tet Ihr nämlich gar nicht 
mitnehmen. müssen. Es 
genügt, wenn Ihr etwa 
zehn Zentimeter aus der 
Mitte des Stieles heraus- 
sägt. Dieses kurze Rund- 
holz nagelt Ihr senkrecht 
auf den Schreibtisch und 
achtet dabei auf den Dau- 
men, der ja für User als 
Eingabegerät besonders 
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-basteltes 


wichtig ist. Wenn Ihr das 
Pflaster gefunden habt 
und die anderen vier Fin- 
ger nicht mehr so schmer- 
zen (auf die hättet Ihr 
eben auch achten müs- 
sen), dann entfernt von 
den 5 Disketten die 
Schutzhülle so, daß Ihr 
nur noch die Magnetfolie 
habt. Und diese stülpt Ihr 
dann so auf den  Besen- 
stiel, daß er durch das 
Loch in der Folienmitte 
hindurchschaut. Jetzt 
könnt Ihr einen zufriede- 
nen Blick auf Euer eige- 
nes Funktionsmodell ei- 
ner Festplatte werfen, 
aber aufpassen, daß es 
nicht dabei kaputt geht. 
Eben fällt mir ein 
(manchmal klappt’s), 
ich hätte das Ganze auch 
mit einem Zehnplatten- 
wechsler erklären kön- 
nen, wie er in Großmut- 
ters HIFI-Anlage ge- 
bräuchlich war. Aber 
wenn Euch auf die Frage 
des Verkäufers schon 
nicht einfällt, was Ihr mit 
einem Besen wollt, wie 
wollt Ihr ihm dann erklä- 
ren, warum Ihr einen 
Plattenspieler zum Ein- 
kaufen mitnehmt? 
Natürlich funktioniert 
unser hübsches selbstge- 
Modell nicht, 
weil es ja keine festen 
Platten, sondern „Flop- 
py”-Platten hat. Bringt 
also die Disketten wieder 
zum Händler und erklärt 
Eurem Haushaltsvors- 


NEHMT MAL EINEN 
BESENSTIEL 


stand, warum der Besen 
mit kurzem Stiel viel prak- 
tischer sein soll, aber be- 
eilt Euch, denn schon 
folgt der erste Merksatz: 
Fast jeder Händler wei- 
gert sich, beschädigte 
Disketten umzutau- 
schen, sofern dies mut- 
willig geschehen sein 
soll. In extrem hart- 
näckigen Fällen ver- 


mag ‚ein mitgeführter 
Besen eine kulante Ei- 
nigung zu erreichen. 


Immerhin ahnt Ihr, wie 
so eine Winchesterplatte 
ausschaut. Daß Disketten 
viel zu flappig waren, 
stellte die Konstrukteure 
zuerst vor ziemliche Pro- 
bleme, sollten sie doch 
eine Harddisc entwickeln. 
Schließlich wurde einer 
der Beteiligten von der 
Muse geküßt und die ret- 
tende Idee geboren. Die 
Hersteller verzichteten 
einfach auf die Floppy 
Disketten und füllten die 
entstandenen Lücken mit 
Aluminiumscheiben. Um 
sie beschreiben zu kön- 
nen, bekleisterten sie die- 
se mit einem magnetisier- 
baren Material und um 
sie lesen zu können, er- 
fanden sie den Lesekopf: 
So ein Schreib-/Lese- 
kopf gleicht leider einem 
Politiker. Er hat keinen 
Kontakt zur Basis, son- 
dern schwebt immer 
knapp darüber, und das 
kleinste bißchen Schmutz 
kann ihn ruinieren. Beim 
Politiker nennt man dies 
einen Skandal, bei der 
Festplatte einen „HEAD- 
CRASH”. Um Schmutz 
zu vermeiden, werden die 
Speichergeräte denn auch 
in staubfreien Räumen 
hergestellt und dem Per- 
sonal ist es auf’s Streng- 
ste verboten, während 
der Arbeit Knäckebrot zu 
essen. Die Anzahl der 
HEADCRASH?’s läßt sich 
dadurch auf ein Mini- 
mum beschränken. Im 
Bundestag ist es seit eini- 
ger Zeit ebenfalls verbo- 
ten, zum Pausenbrot zu 
greifen, wenngleich der 
Erfolg noch nicht einge- 
treten ist. Den Erfolg des 
Kurses dagegen sollte 
jeder mit dem Verständ- 
nis des nächsten Merksat- 
zes belegen können. 
Eine Harddisc ist der- 
artig empfindlich 
gegen Schmutz, daß 
sich jeder die Hände 


GLOSSE 


waschen sollte, bevor 
er die Finger davon 
läßt 


Wozu der ganze Aufwand, 
mag sich mancher fra- 
gen, wenn ein simpler Be- 
senstil mit Disketten be- 
hangen doch ebenso 
schmückt. Nun, es geht 
nicht um den Schmuck 
alleine. Eine Festplatte 
faßt mindestens ebenso- 
viele Daten wie sie Geld 
kostet. Mit anderen Wor- 
ten: Wer sich eine Hard- 
disc kauft, dem ersetzt 
diese so ziemlich genau 
ungefähr 60 Disketten, 
die er sich nach dem 
Kauf der Harddisc ohne- 
hin nicht mehr leisten 
könnte, zumindest der 
Hobby-Anwender von 
Computern. Praktisch, 
was? 

Da für viele beim Stich- 
wort Geld das Thema oh- 
nehin erledigt sein dürfte, 
möchte ich die restlichen 
zwei Leser (Tapfer, 
Jungs, tapfer!) mit dem 
letzten Merksatz und ein 
paar Fragen entlassen. 
Merket also: 

Eine Festplatte ist sehr 

teuer. Da dies jedoch 

nur dann relevant ist, 
wenn man sich eine 
kaufen will, dann je- 
doch keine erwirbt, 
weil sie zu teuer ist, 
was aber ohnehin nur 
wichtig wäre, wenn 
man doch eine kauft, 
ist es eigentlich egal. 

Gelle? 

Und dem nunmehr letz- 
ten Leser stelle ich die 
Frage: 

Wird F.W. die Klippen 
des nächsten Kursteiles 
schaffen 
a) oder versagt sein Deo- 

dorant? 
b)Oder läßt seine Frau 

ihn endlich einliefern? 
c) Oder plädiert der An 
walt gar auf Frei- 


spruch? 
Versäumt nicht die näch 
ste Folge mit neuen 


Abenteuern aus der digi 
talen Welt. F.W 


F.W.: ANTWORT 
AUF LESER- 
FRAGEN! 


Der Amstrad/Schneider 
PC, der PC 1512, wie er 
auch liebkosend ge- 
nannt wird, geistert 
durch alle Medien und 
verwirrt den User. Und 
wie immer, wenn von 
Verwirrung die Rede ist, 
ist F.W. nicht weit (um 
zu antworten versteht 
sich). Geplant war eine 
großangelegte Telefonak- 
tion, mit Pressevertretern 
und Meister Shugar per- 
sönlich. Leider war der 
Amstrad Chef verhindert, 
weil er ja jetzt die vielen 
PC’s in Kartons verpak- 
ken und abschicken muß. 
Die Presse besuchte lieber 
die Wahl zur „Miss Lang- 
ohr‘“ beim westfälischen 
Kaninchenzüchterver- 
band und zu allem Über- 
druß fiel in letzter Minu- 
te auf, daß F.W. gar kein 
Telefon besitzt. Deshalb 
die Antworten in gewohn- 
ter schriftlicher Form: 
Micki Lauda fragt: 

Ich habe gehört, GEM 
läuft auf dem PC 1512 
etwas langsamer als auf 
dem Atari. Kann man das 
nicht irgendwie ändern? 
F.W. antwortet: 

Hinter uns liegen aufwen- 
dige Versuche, die Ar- 
beitsgeschwindigkeit 
unter GEM zu erhöhen. 
Zuerst  lackierten wir 
seitlich auf der Maus Ral- 
leystreifen, was diese tat- 
sächlich optisch rasanter 
machte. Nun ergab sich 
jedoch das Problem, daß 
der Mittelsteg des Einga- 
begerätes zu einer strö- 
mungsungünstigen Form 
führte. Die Maus reagierte 
empfindlich auf Seiten- 
wind. Einer der besten 
Designer, Luigi Kolamı, 
arbeitet derzeit in unse- 
rem Auftrag an einem 
neuen Gehäuse, das den 
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CW-Wert von 7.15 auf 
mindestens 7.12 senken 
soll. Die fertige Maus 
wird dann der des Atari 
ebenbürtig sein. 


Otto Qualle fragt: 
Vergeblich suchte ich 
beim Amstrad/Schneider 
PC den beim CPC 464 
bewährten Kassettenre- 
corder. Es scheint so, als 
wird die Firma. ihrer De- 
vise „Komplett-Compu- 
ter‘ untreu und geizt an 
der Ausstattung. 


F.W. antwortet: 
Schneider geizt höchstens 
mit Auskünften. Tech- 
nisch ist das Gerät kom- 
plett, aber auf Kompatı- 
bilität zum IBM ausge- 
legt und die meisten Pro- 
gramme gibt es nun ein- 
mal im Diskettenformat 
5.25 Zoll. Sobald aber 
der M&T Verlag seine 
low cost Cassetten Ver- 
sionen mit Wordstar und 
Multiplan vorlegt, wird es 
einen Schneider PC mit 
Tapedeck zum Sparpreis 
geben. 


Melitta Dschibo fragt: 
Der PC von Schneider ist 
ein derartig kompaktes 
Gerät, daß ich nicht 
weiß, wohin mit meinen 
Butterstullen. Auf dem 
schrägen Monitor rut- 
schen sie runter, auf der 
Zentraleinheit macht sich 
der Monitor breit und 
den Schreibtisch belegt 
die Maus. Was nu? 


F.W. antwortet? 

Amstrad hat auch daran 
gedacht. Hinter einer Ab- 
deckung an der rechten 
Seite der Zentraleinheit 
verbergen sich drei Steck- 
plätze nach IBM Norm. 
Die IBM Normsteckplätze 


bieten bekanntlich Platz 2» 


GLOSSE 


für 2 Pumpernickelbrote 
mit Käse nach westfäh- 
scher Art oder ein Grau- 
bort mit Jagdleberwurst. 
Guten Appetit. 


F. von Anisi fragt: 

Was frißt die Maus und 
wird nach einr Weile der 
Gestank nicht unerträg- 
lich? 


F.W. antwortet: 

Voraussetzung zur Pflege 
der Maus ist eine regelmä- 
Rige Reinigung. Dann 
aber kann sıe auch völlig 
geruchsfrei ın der Woh- 
nung gehalten werden. 
Zur ersten Frage half uns 
Prof. Gschimek, Deutsch- 
lands oberster Mäuserich- 
Experte. Seiner Meinung 
nach, so läßt er unwirsch 
ausrichten, frißt sie gar 
schon überhaupt nichts. 
Auch Tiere, und da 
macht des Menschen be- 
ster Freund, die Maus, 
keine Ausnahme, pflegen 
zu essen oder zu speisen. 


Rein sprachlich, gelle !!! 


Ch. Wild-Durch fragt: 

Da lese ich doch kürz- 
lich in einer Zeitschrift, 
daß der PC im November 
85 von Amstrad in An- 
griff genommen wurde. 
Und im Juli dieses Jah- 
res kam eine Redaktion 
bereits in Besitz des Gerä- 
tes. Andererseits meinte 
eine „internationale“ 
Schneiderzeitschrift, 

diesen Sommer noch dem 
Gerücht vornehm ‚Ade“ 
sagen zu müssen. Bei ei- 
nem Anruf hatte Schnei- 
der Türkheim den Gedan- 
ken an einen PC weit 
von sich gewiesen. Wie 
läßt sich denn all dies 


vereinbaren? 


F.W. antwortet: 
Heute bittet Elfriede 
Hammer die Redaktion 
von XXX XXXXXXXXX 
mit nachfolgender Erklä- 
rung um Entschuldigung: 
Ich bin nur Putzfrau 
und gehe normalerweise 
nicht ans Telefon des 


Hausmeisters, weil uns 
Privatgespräche verboten 
sind, auch wenn angeru- 
fen wird. An diesem Tag 
wollte jedoch mein 
Schwager wegen dieser 
leidigen Geschichte mit 
Oma anrufen und da ha- 
be ich mal eine Ausnah- 
me gemacht. Als ich 
gemerkt habe, daß ... 

Ich (F.W.) habe diesen 
Brief leider aus Platzgrün- 
den kürzen müssen, ob- 
wohl gerade die Geschich- 
te mit Oma ihren Reiz 
hatte. Auch mein Bedau- 
ern geht an die Redak- 
tion. Die Moral von der 
Geschichte: Lieber ein 
bißchen in der Gerüchte- 
suppe kochen als alles zu 
glauben, was man hört. 


A. McIntosh fragt: 

Jetzt mal ehrlich! Außer 
der phantastischen Aus- 
stattung zu diesem Preis 
ist doch nichts Neues am 
PC 1512, oder? 


F.W. antwortet: 

Doch!!! Und damit ist 
Amstrad sogar Trend- 
setter. Erstmals werden 
farbige (!) Systemdisket- 
ten der Lieferung beige- 
legt. Neidisch will IBM 
nachziehen und verhan- 
delt um die Urheberrech- 
te an Stephen Spielbergs 
Farbe Lila. 


Prof. Kuransky fragt: 
Kompatibel, kompatibel, 
kompatibel ... Man hört 
schon nichts anderes 
mehr. Da kann ich mir 
doch gleich einen Schnei- 
der kaufen statt eines 
IBM. 


F.W. antwortet: 

Das hat sich auch die In- 
ternational Bussiness Ma- 
schine (kurz IBM) über- 
legt. Wenn die Kompatı- 
bilitätsversuche weiterhin 
so verlaufen, will die Fir- 
ma _Produktionskosten 
sparen und ıhr Know 
How dazu verwenden, für 
den PC 1512 die Hand- 
bücher und Prospekte zu 
drucken. 


SATIRE 


COMPUTER- 
FRAEKS:DAS. 
NEUE MONSTER 
VON LOCHNESS 


Neben dem Weinskandal 
und dem Reaktorunfall 
in der Ukraine gibt es für 
unsere Medien, insbeson- 
dere für die Presse, noch 
den Computerfreak als 
Seitenfüller, der dadurch 
endgültig dem Ungeheuer 
von Loch Ness den Rang 
ablaufen wird. Die Jour- 
nalisten erwägen nun, 
dem Homecomputer-User 
einen Spitznamen zu ver- 
leihen, ähnlich dem schot- 
tischen Ungeheuer, das ja 
als Nessie immer zur Dek- 
kung der Sommerflaute 


OFT GEHT DIE 
PHANTASIE DURCH 
herangezogen wurde. Für 


den User istneben ‚„Usie“ 
und „Freakie‘ auch noch 
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„Freakadellie“ 
spräch. Nächsten Som- 
mer weiß der Leser dann 
auch gleich, wer gemeint 
ist, der Typus des „Usies“ 


im Ge- 


wurde ja bereits 1985 
ausgearbeitet. 

Einigen besonderen 
Meisten der schreiben- 
den Zunft geht dabei die 
Phantasie durch, sie wähn- 
ten sich immer noch bei 
einem Artikel über das 
Loch Ness Monster. Im- 
mer fleißig auf irgendwel- 
che ominösen aber reprä- 
sentativen Umfragen 
klopfend, zeichneten sie 
das Bild eines neuen 
Monsters, technisch be- 
gabt zwar, ansonsten aber 
ausgestoßen aus der Ge- 
sellschaft wie einstens 
Frankensteins Kreaturen. 


Heute traut man sich 
kaum, den Taschenrech- 
ner im Supermarkt zu be- 
nutzen, nur damit man 
nicht auffällt. 


WIE UNSERE 
POLITIKER 


Daß Computerfreaks 
die Massenarbeitslosigkeit 
wenn nicht verursacht so 
doch gutgeheißen hätten, 
ist bei der Schreiberei 
noch das Harmloseste, 
der Rest liest sich so: 

Natürlich ist er unfä- 
hig zur Kommunikation 
... oder gar zu zwischen- 
menschlichen Beziehun- 
gen, wahrscheinlich weiß 
er gar nicht, was das ist, 


denn schließlich be- 
herrscht er nur einen Ter- 
minus Technicus. Un: 
sportlichkeit und das 
lange Sitzen vor dem 


Schreibgerät führen zur 
Rückgratverkrümmung 
und zur Minderung der 
Sehschärfe. Der fehlende 
Schlaf durch häufige 
Nachtarbeit macht sich in 
Übellaunigkeit und Reiz- 
barkeit bemerkbar. Der 
ständige Erfolgszwang 
führt zu Neid und Miß- 
gunst, was wiederum die 
Kontaktfähigkeit stark 
einschränkt, deshalb er- 
trägt er in seiner Umge- 
bung nur Gleichgesinnte, 
die er dann mit prahleri- 
schen Erzählungen über- 
trumpfen will. Nur weni- 
ge wollen mit dem Jour- 
nalisten etwas ... 

Verzeihung lieber Le- 
ser. Im letzten Absatz 
wurden aufgrund eines 
technischen Versagens die 
Umfrageergebnisse über 
Journalisten zitiert. 

Den Irrtum ließ ich 
mir zur Warnung werden 
und um gerechtes Zahlen- 
material zu haben, führte 
ich meine eigenen Um- 
fragen durch. Was den 
„Usie‘“ betrifft, hat sich 
allerdings das (schlechte) 
Bild der Medien bestätigt. 
Bei den Befragten (Einer) 


SATIRE 


mußte zu 100% festge- 


stellt werden, daß der 
Computer als Droge 
wirkt. 


Lesen Sie das beste- 
hende Interview und Sie 
werden meine Bestürzung 
teilen, daß dieses ausge- 
suchte Exemplar immer 
wieder auf das (sein) The- 
ma zurückkommt. Zum 
besseren Verständnis 
habe ich den ‚‚Freakie‘“ 
mit Fr. abgekürzt, mei- 
nereiner dagegen mit Me., 
zudem muß erwähnt wer- 
den, daß dieser exempla- 
rische Fall ursprünglich in 
einer anderen Absicht an 
meine Tür klopfte und 
das Gespräch eröffnete. 


MAL EINE EIGENE 
UNTERSUCHUNG 


Fr: Guten Tag, ich arbeite 
für das Müttergenesungs- 
werk und möchte ... 

Me: Stören Sie mich bitte 
nicht, ich sitze am Com- 
puter 

Fr: Sehr interessant, aber 
die Mütter ... 

Me: ... meine Mütter ??? 
Fr: Sie verstehen mich 
falsch, ich sa... 

Me: Ich versteh’ Sie über- 
haupt nicht, der Drucker 
macht so ’nen Krach. 

Fr: Also die Mütter ... 
Me: Ahhh, jetzt versteh’ 
ich, Big Mother IBM, was 
ist denn damit? 

Fr: Nein, nicht IBM, un- 
ser Hilfswerk steht unter 
der Schirmherrschaft vo... 
Me: Herrschaftsseiten, 
jetzt hat sich das Papier 
zerknittert, vielleicht soll- 
te ich erst mal formatie- 
ren, wollen Sie zuschau- 
en? 

Fr: Nein, eigentlich woll- 
te ich eine bestimmte 
Summe haben, weil ich... 
Me: Da müßte ich erst 
mal Multiplan einladen. 
Gleich, wenn ich hiermit 
fertig bin, ja? 

Fr: Hören Sie, ich will 
nur Geld für die Mütter, 
damit das Hilfswerk mal 


Urlaub machen kann 
oder so ähnlich und .... 
ähh,wo war ich stehenge- 
blieben? 

Me: Da, aber kommen 
Sie ruhig näher, dann se- 
hen Sie besser. 

Fr: Also noch mal, ich 
komme we... 

Me: Ja ja, kommen Sie 
ruhig näher. 

Fr: JETZT HAB’ ICH 
DIE FAXEN ABER DIK- 


KE, MICH INTERES- - 


SIERT IHR SCHEISS- 
COMPUTER NICHT!!! 
Me: Viel wichtiger ist 
ja auch, was man damit 
macht. Technische Ein- 
zelheiten stören nur. Also 
ich schreibe hier gerade 
einen Artikel über den 
Computer als Droge bei 
Jugendlichen. Wenn der 
ausgedruckt ist, dann ... 
Das Gespräch konnte 
nie zu Ende geführt wer- 
den, da mein Gast ohn- 
mächtig zusammenbrach. 
Wenn wir von Droge re- 


c/o. GERT SEIDEL 
CPCMASTA 
Be 


Sport platzstr.i2 


Mathematische Statistik (Mw. Signifikanz, Korrelation) 
Varianz, Varlanzanalyso wow.) mil graphischer Aus | 
wertung (Balkongrapkik, EN: 34 Balkon) 


den, dann war ich bei die- 
sem Freak wohl Zeuge 
eines „Goldenen Schus- 
ses“. 

Wochen später erfuhr 
ich, daß der junge Mann 
versucht hatte, als Mutter 
verkleidet in eine Scharz- 
waldklinik einzudringen, 
um dort Zuflucht zu su- 
chen. Es wurde Schizo- 
phrenie diagnostiziert, 
weshalb er nunmehr sein 
Leben zwangsweise 
hinter den Gittern des 
Tierheims Wannerboode 
verbringt. Dem Verneh- 
men nach hat er nie 
wieder nach einem Com- 
puter verlangt. 

Sicher hatte ich einen 
sehr extremen Fall erlebt, 
aber jetzt las ich die Zei- 
tungsberichte über die 
Usies in einem anderen 
Licht. Nicht, daß diese 
dadurch glaubhafter wur- 
den, aber die Beleuchtung 
tat meinen Augen en 


SULLEE 


Postgiro: 3471/ 604 ttm. 


3552 better 


|CPC MULTIDATEI 


D 89. - 


mit mathomalischen Sonderiunklionen. Ideal zu, 
Versuche - und Wertorlassung. 
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\CPC KALKULATION & GRAPHIK 30% Zeien, 7 spalten kann. | — 
latlonsblatt. Graphische Auswertung der bearbeitelen ns 
D73.- C 69.- Tabelle durch d-Diagramm, Balkengraphik, Kreisgr. 


CPC HOME MANAGER 
HANOLGER 


kalender. Einfache Bedienung, dasureh Ideal fur den 

zZ D 69.- C58.- täglichen Kleinkram (Konto, Adressen, Geburtstage) 
| CPC DISuY 

sammiung. Komieriable Eingabemaske und Such - 

D59.- 7 I8.- ronstinen. Bearbeitung des Direetorys mglich. 


CPC FUM & VIDEODATEI Verwaltung Ihrer Videokassetion auf 
boquome Welse. Durch die Eingabemaske und die | 
Suchreutine Ist die Benutzung auch beim Computer | 


D589.- CII.— sion garantiert. 


Programmdatel bringt Übersicht In Ihre Disketten - 


ton Standarddaten die ergänzt worden konnen. Buch 
2 9. - C #9. — vodingungen konnen vorkaupfi werden. 


a 


[CPC = Boquome Eingabomasken mit En 


ze 


Mittelwert (Arltkm. +Log.), Mw. - Fehler, Vertrausensbereich, Median, 

Quartilabstand, Varianz, Varlatlonskoeflizient, Standardabweichung, 

Mass und Rangkorrelation, Sigallikanzen (P : 6%. 1% 0.1%) 

t Test's bei - korrellerenden Proben. Korrelationen, Mittelwert 

und nach FERGUSON, Varlanzanalyse, Multiple range Test, Graphik. 

3d Diagramme (Saule + Kurve). Balkengraphik, Regressionsgerade 
uvm. (info anfordern) nur Diskelie 1 3 9 . 


TEST 


EINE MAUS MIT 
MALPROGRAM 


SHE 3 k 
Seit einiger Zeit gibt es jetzt auch hier in Deutschland das „Eingabeme- ], 
dium” für die Schneider-User. Es handelt sich um eine sog. „Maus”. Man kann’ man 


AMX ART, das Malprogramm, ist ei- 
gentlich das wichtigste mitgelieferte 
Programm: Mit ihm kann man kom- 
fortabel und relativ einfach mit 
Hilfe der Maus Bilder in MODE 1 
erstellen. Standardfunktionen wie 
Freihandzeichen, Kreise, Rechtek- 
e, ... sind selbstverständlich vor- 
anden. Radieren und Sprayen 
mit max. 12 verschiede- 


bewegt die Maus, auf deren Unterseite sich eine Kugel befindet, in irgend- nen Formen (z.B. verschiedengroße 
eine Richtung, die der Computer aufgrund der Kugelbewegung auf dem Quadrate, Kreise ...) erledigen. Von 
Bildschirm nachvollziehen kann; so kann man einfach, schnell und kom- den möglichen vier Farben sind 
fortabel Menues anwählen, Bilder zeichnen, u.v.m. Nach dieser kurzen schwarz und weiß immer vorhan- 
Einführung in die Technik der Maus kommen wir nun zu dem eigentlichen 
Test der Maus (wir haben die schon länger auf dem Markt befindliche 
„AMX-Mouse” getestet; es gibt aber inzwischen auch eine weitere Maus 


für den CPC). 


Für ca. 200-250 DM erhält man 
außer der Maus eine kurze Anlei- 
tung, einige Software und das Mou- 
se-Interface, das am Joystickport 
eingesteckt und über das 5 Volt 
Monitorkabel mit Strom versorgt 
wird. 

Die auf Kassette gelieferte Soft- 
ware besteht aus Programmen 
— AMX Control 

ermöglicht die Kontrolle der 

. Maus und muß daher vor jedem 

Programm, das mit der Maus ar- 

beitet, geladen werden. Neue, im 

Handbuch erklärte RSX-Befehle 

machen die Nutzung der Maus in 

BASIC-Programmen möglich. 

— AMX ART 

ist ein menügesteuertes Malpro- 

gramm speziell für Mäuse. 
— ICON DESIGNER 

ermöglicht die Neudefinierung 

der benutzten Icons (,Icons“ 

sind im Malprogramm verwende- 
te Symbole wie z.B. ein Radier- 
gummi, mit dem man auf dem 

Bildschirm „radieren“ kann). 

— PATTERN DESIGNER 

macht .es möglich, eigene Muster 

zu entwerfen, die später im 

Malprogramm benutzt werden 

können. 

Die Maus und das Interface sind 
farblich auf die CPCs abgestimmt 
und funktionieren einwandfrei; 
allerdings sollte man die Maus auf 
einer mögichst glatten Unterlage be- 
nutzen. 

Nun zum Handbuch und der 
Software, die leider teilwesie nicht 
so einwandfrei ist. 

Das engl. Handbuch ist ca. 40 
Seiten stark und enthält viele Hard- 
copies. Die mitgelieferte Software 


wird vom Handbuch nur mittelmä- 
Big erklärt, so daß man einige Zeit 
zum Ausprobieren und Einarbeiten 
benötigt. 

Die RSX-Befehle werden gut und 


den; die beiden anderen kann man 
sich aus den 27 verschiedenen Far- 
ben der CPCs wählen. Die Fill- 
Routine zum Ausfüllen beliebiger 
Flächen hebt sich von den her- 
kömmlichen dadurch ab daß man 
mit ihr nicht nur einfarbig, sondern 
auch mit 24 schon vorhandenen 
Mustern (Patterns) ausfüllen kann 
(diese Muster können mit dem Pat- | 
tern Designer selbst entworfen oder 


jeweils mit einem Beispielprogramm 
erläutert; mit diesen Befehlen 
wurde z.B. der ICON- und der PAT- 
TERN DESIGNER erstellt, was 
ihren Nutzen eindrucksvoll be- 
legt. 

Maschinen-Programmierer kön- 
nen im Anhang A die Übergabe- 
parameter für die AMX CONTROL- 
Routinen erfahren. Im Anhang B 
wird lobenswerter Weise beschrie- 
ben, wie man die mitgelieferte 
Software auf Disk kopieren kann! 
Dies ist sicher ein großer Pluspunkt. 

Die mitglieferten Programme im 
einzelnen: 

AMX CONTROL erfüllt die oben 
beschriebenen Ausgaben einwand- 
frei. 
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verändert werden). Außerdem kön- 
nen diese Patterns farbig gemacht 
werden, so daß man bei den Farben 
Rot und Grün z.B. u.a. ein Rosa-Pat- 
tern erhält, welches durch Kombi- 
nation von Rot und Weiß ent- 
stand. Leider, leider funktioniert 
diese Fill-Routine nicht einwandfrei, 
d.h. einige Bereiche werden nicht 
ausgefüllt; doch diese kann man 
dann wiederum ausfüllen. Absaven 
und Laden von Bildern bzw. La- 
den von neuen Mustern geht pro- 
blemlos, aber die gesaveten Bilder 
lassen sich nicht in eigene Pro- 
gramme einbinden — schade! auch 
kann man sich die Bilder nur mit 
einem EPSON-Drucker ausdrucken 
lassen, was uns, wie sicher auch 
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viele andere Schneider NLQ401- 
Besitzer, nicht gerade erfreut. Be- 
merkenswert wäre noch, daß AMX 
ART manchmal aussteigt! Durch 
die zuletzt aufgeführten Mankos 
wird der zuerst gute Gesamtein- 
druck von AMX ART allerdings et- 
was getrübt. 

Der PATTERN DESIGNER er- 
mögicht die Neudefinierung und 
Veränderung von den oben be- 
schriebenen Mustern (Patterns) und 
funktioniert gut. Die neuen Muster 
können auf Disk oder Kassette ge- 
speichert werden und vom AMX 
ART als Mustersatz nachgeladen 
werden. 

Der ICON DESIGNER funktio- 
niert wie der Pattern Designer, nur 
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daß hier halt Icons (s.o. = Symbole 
wie Bleistift, ...) neu- und/oder um- 
definiert werden können. Allerdings 
können Icon-Files nicht vom AMX 
Art nachgeladen werden; um eigene 
Icons zu benutzen, muß man den 
Basic-Lader von AMX Control, der 
AMX Art lädt, ändern. 

Unserer Meinung nach erhält 
man insgesamt eine gute, nützliche 


Erweiterung für die CPs. Allerdings 


sollten die Fehler und Mankos 
beseitigt werden; dann könnten wir 
die AMX Mouse — trotz des realtiv 
hohen Preises — guten Gewissens 
weiterempfehlen; doch man sollte 
den Komfort und den Spaß nicht 
unterschätzen, den das „Arbeiten“ 
mit der Maus macht. 
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Mit der AMX-Mouse gezeichnet und dem 
Programm AMX-Art erstellt: Hardcopies 


Außerdem werden für die AMX- 
Maus (laufend) Ergänzungsprogram- 
me wie der AMX-Pagemaker 
(ein Programm zum Erstellen von 
Titelseiten, Zeitungen, ...) produ- 
ziert. 

Wie oben geschildert hat AMX- 
Art nur eine Epson-Hardcopy inte- 
griert, und die erstellten Bilder kön- 
nen nicht in eigene Programme ein- 
gebaut werden. Diese beiden (nicht 
unerheblichen) Mängel beseitigt 
mein Programm „AMX-Help“: es 
lädt die Maus-Bilder im AMX-For- 
mat und zeigt sie dabei an. Dann 
kann man das Bild im normalen 
CPC-Format SAVEn, so daß man 
ein Bild z.B. als Titelbild für ein ei- 
genes Programm benutzen kann. 

Wer sein Kunstwerk gern auf Pa- 
pier haben möchte, lädt das norma- 
le geSAVEte Bild und startet dann 
das Hardcopy-Programm für seinen 
Drucker. So wird es allen Drucker- 
besitzern — vorausgesetzt sie haben 
ein Hardcopy-Programm — ermög- 
licht, sich die eigenen Werke aus- 
zudrucken. 

(Jan-Mirko & Bent-Martin 
Maczewski) 


TEST 


MIT DEM BILDRÖHREN- 
BAUSTEIN ZAUBERN 


Kennen Sie den HD68455 CRTC? Noch nicht? 
Keine Bange — in diesem Artikel werden Sie ihn 
kennenlernen und somit eine wesentliche Bildungs- 


lücke füllen können. 


CRTC bedeutet ‚„Catho- 
de Ray Tube Controller“, 
zu deutsch also „Bildröh- 
ren-Steuerung“ HD68455 
ist die Typbezeichnung 
des Bausteins, der in un- 
serem Schneider CPC 
ebendiese Aufgabe über- 
nimmt. Das Firmware- 
Handbuch gibt auch Aus- 
kunft darüber, wie man 
diesen Chip direkt ansteu- 
ert, und zwar über die 
Z80-Ein-/Ausgabekanäle. 
An &BC00 muß die 
Adresse angelegt werden, 
über &BC00 versieht man 
die Adresse des 
CRTC mit Daten. Das 
Handbuch hält bei diesen 
Kanälen nur den Hinweis 
bereit: „nicht verwen- 
den“. Da stellt sich doch 
die Frage, warum eigent- 
lich nicht. Kaputtmachen 
können Sie nıchts, höch- 
stens ein paar neue Mög- 
lichkeiten Ihres CPC nut- 
zen. Und dafür lohnt es 
sich schon, ein bißchen 
zu experimentieren. 


EIN EXTREMER FALL, 
ABER ... 


Blättern wir weiter im 
Firmware-Handbuch. 
Gleich auf der nächsten 
Seite finden sich die 
Adressen des GRTC, von 
denen im Folgenden eini- 
ge herausgepickt und nä- 
her besprochen werden 
sollen. 

Beginnen wir gleich 
mit Adresse 0. Sie enthält 
die horizontal insgesamt 
darstellbaren Spalten. 


Standardwert dafür ist 
63. Mit 
OUT &BC00, 0:0OUT 
&BD00, x 


können Sie eine hübsche 
Bildstörung fabrizieren: 
Das Bild läuft horizontal 
durch bzw. ist total ‚‚ver- 
schneit“. Der Wert von 
x sollte dabei +/— 13 um 
den Standardwert variie- 
ren. Die „‚hübscheste‘“ 
Störung erzeugt nach An- 
sicht des Autors der Wert 
50; doch Sie können das 
ruhig selbst ausprobieren. 
Die Eingabe des Standard- 
wertes bringt alles wieder 
in Ordnung. Leider müs- 
sen Sie dabei blind tip- 
pen, da auf dem Monitor 
nicht mehr zu erkennen 
ist. Im äußersten Notfall 
hilft aber CTRL-SHIFT- 
ESC. 

Register 1 des CRTC 
enthält die horizontal ins- 
gesamt dargestellten Spal- 


ten. Der Standardwert 
beträgt hier 40 — übri- 
gens unabhängig vom 
Bildschirmmodus! 


OUT &BC00, 1:OUT 
&BD00,x 
mit x-Werten unter 40 
schränkt den Bereich für 


die 
von rechts her ein. Aber 
Vorsicht: Der Scroll-Zäh- 


Bildschirmausgabe 


ler funktioniert dabei 
nicht mehr richtig, so daß 
diese Befehlsfolge nicht 
als Ersatz für WINDOW 
verwendet werden sollte. 
Lassen Sie aber in einer 
Schleife x von 40 bis 0 
zurücklaufen, können Sie 
ein Bild elegant ver- 
schwinden lassen. 

Ebenso ist es möglich, 
eine Grafik auf den Bild- 
schirm zu schieben: 

FOR ı=1 TO 40: 

OUT &BC00, 1:OUT 

&BD00,i: FOR j=1 

TO 100: NEXT j,i 
Diese Methode ist wirk- 
lich nicht die schlechte- 
ste. Doch gleich das näch- 
ste CRTC-Register bietet 
noch mehr. 

An Adresse 2 liegen 
nämlich die Daten für die 
horizontale Synchronisa- 
tions-Position. Standard- 
wert ist 46. Die Synchro- 
Position bestimmt, in 
welcher Spalte die Bild- 
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schirmdarstellung be- 
ginnt. Damit können Sie 
die „rechte“ Spalte z.B. 
in die Schirmmitte ver- 
schieben. Alles, was da- 
durch rechts ‚‚herausra- 
gen“ würde, erscheint 
nun auf der linken Seite. 
Sie können damit bei- 
spielsweise eme Grafik 
um den Bildschirm ‚„ro- 
tieren“ lassen: 

FOR i=1 TO 46: 

OUT &BC00, 2:0UT 

&BD00, ı: 

FOR j=1 TO 100: 

NEXT j,i 
Wenn Ihnen die Richtung 
nicht gefällt, lassen Sie 
die i-Schleife eben rück- 
wärts laufen. Oder hin 
und her. Ganz wie’s be- 
liebt. 

Nochmal zum Thema 
Bildstörung. Die Anzahl 
der vertikal darstellbaren 
Zeilen bietet sich hier 
geradezu an. Der Stan- 
dardwert für Adresse 4 ist 
38. Wenn Sie ihn durch 

OUT &BC00, 4:OUT 

&BD00,x 
verändern, läuft das Bild 
nach oben durch. Je klei- 


NOTFALLS 
BLIND TIPPEN 


ner dabei x ist, desto lang- 
samer geht das Ganze. 
Sie können aber auch 
durch langsames Erhöhen 
von x aufs Gas drücken. 
Der Effekt ist überwälti- 
gend. , 

Wenn Sie schwarze 
Balken beim Durchlaufen 
bevorzugen, verwenden 
Sie Register 5. Standard- 
wert dafür ist 0. Es ent- 
hält die Vertikal-Einstel- 
lung, was ungefähr dem 
Bildfang-Knöpfchen an 
älteren Fernsehgeräten 
entspricht. Bei Werten 
zwischen 15 und 255 läuft 
das Bild mehr oder weni- 
ger schnell. 

Die vertikal dargestell- 
ten Zeilen, die in Register 
6 normalerweise als 25 
gespeichert sind, bieten 


wieder eine nützlichere 
Anwendung. Damit kön- 
nen Sie nämlich von un- 
ten her Bildschirmzeilen 
verschwinden lassen. Oder 
von oben her auftauchen. 
Beispielsweise können Sie 
mit 
OUT &BC00, 6:OUT 
&BD00,0 
die _Bildschirmausgabe 
unterdrücken. Gezeichnet 
wird aber trotzdem! Mit 
OUT &BC00, 6:OUT 
&BD00,25 


TEST 


zontal rotieren lassen kön- 
nen, geht das natürlich 
auch vertikal. Sie müssen 
nur. die entsprechende 
Synchro-Position verwen- 
den, die sich als 30 in 
Register 7 des CRTC 
befindet. Beim Durchlau- 
fen in einer Schleife von 
0 bis 03 wackelt das 
Ding aber ziemlich. 
Register 8 enthält eine 
0 für Interlace und Skew. 
Was das ist, wissen Fern- 
sehtechniker; der Autor 


III 
IAHRRRRANE 


1. 
ETTTTT 


erscheint Ihre Grafik so- 
fort. Sie können aber das 
Gemälde auch langsam 
enthüllen: 
FOR i=0 TO 25: 
OUT &BC00, 6:OUT 
&BD00,:: 
FOR j=1 TO 100: 
NEXT j,i 
Wenn Sie ein Bild horı- 


dieses Artikels muß zuge- 
ben, keine blasse Ahnung 
zu haben. Trotzdem: 
Wenn Sie statt der O0 eine 
5 ins Register schreiben, 
erzielen Sie ein leichtes 


ÜBERWALTIGENDER 
EFFEKT 


Vibrieren des Bildes. Das 
kann, von einem Explo- 
sionsgeräusch untermalt, 
in einem Ballerspielchen 
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Der Schneider hat viele verborgene Vorzüge. Wir stöberten 
etwas im Inneren und machten dabei verblüffende Entdeckun- 


gen. 


durchaus nützlich sein, 
um z.B. den Aufschlag 
einer Bombe darzustellen. 
Vergessen Sie aber nicht, 
das Wackeln nach der Ex- 
plosion wieder abzustel- 
len! . 

Die Register 9 bis 15 
sind für den Anwender 
ziemlich uninteressant. 
Aber lassen Sie sich nicht 
davon abhalten, mit den 
hier vorgestellten CRTC- 
Adressen zu experimen- 
tieren. Die Vielzahl der. 


Effekte läßt Ihnen eini- 
gen Spielraum. Sie müs- 
sen lediglich aufpassen, 
daß Sie nach stundenlan- 
gem Starren auf den Mo- 
nitor nicht am berühmten 
Hacker-Syndrom leiden. 
Was das ist? Quadratische 


Pupillen! ; 
(Alwin Ertl) 


TEST 


Meine Erfahrungen mit verschiede- 

nen Produkten sind mager, zumal BASIC-COM r7 LER 

bei meinem System, bestehend aus 

Siege; AUF DEM 464 

py und Vortex Speicherkarte SP 

320, bislang fast alle Versuche 

scheiterten, einen mit dieser Hard- In letzter Zeit werden auf dem Softwaremarkt zahlreiche „BASIC-Com- 

warekonfiguration kompatiblen piler” verschiedener Hersteller auch für den Schneider CPC angeboten. Ein 

Compiler zu finden. Nach er „Compiler‘ übersetzt eine höhere Programmiersprache (z.B. BASIC) in 

Händleranfragen und Direktanfra- schnellen Maschinencode. Das „compilierte” Programm sollte dann 

Ben h bei h den ur wesentlich schneller ablaufen als das Äquivalent der höheren Programmier- 

Bee Kane ne den eier CM sprache. Hinsichtlich der Art der zu compilierenden Programmen (Gra- 

lauffähigen CBASIC-Compiler. phik/Kalkulation/Textverarbeitung/Datenbanken/Spiele ...), der Bedie- 
So weit — so gut. Ich möchte nungsfreundlichkeit des Compilers und ihrer Leistungsfähigkeit und 

keinen Vergleich Compiler zu Com- Kompatibilität zur Hardwarekonfiguration unterscheiden sich die einzel- 

piler, sondern lediglich meine eige- nen Produkte gewaltig. 

nen Erfahrungen mit dem CBASIC- 

Compiler von Digital Research be- 

schreiben. 


KEINE PROBLEME MIT VDOS 


Zu meinem Erstaunen stellte ich 
fest, daß der CBASIC-Compiler mir 
keine Scherereien mit der Speicher- 
karte und VDOS 2.0 bereitete: 
Auch unter der erweiterten CP/M- 
Version (62k) von Vortex ist das 
Programm lauffähig. Gleich ging ich 
an das Handbuch, um mich mit der 
Leistungsfähigkeit des Programms 
vertraut zu machen. Das Handbuch 
ist zwar in englischer Sprache ge- 
schrieben, jedoch auch für Personen 
mit geringen Englischkenntnissen 
klar, übersichtlich und verständlich. 
Ein kleines Beispielprogramm, in 
dem 10 mal der Text „Testing the 
CBASIC-Compiler!“ untereinander 
auf den Bildschirm ausgegeben wer- 
den soll, klappte! Jetzt ging es an 
das Entwickeln eigener Programme. 
Auch hier erwies sich die Benut- 
zung des Handbuches als sehr in- 
struktiv, da eine ausführlich doku- 
mentierte Befehlsübersicht über die 
Syntax der Befehle und Funktio- 
nen anhand von Beispielen gut 
informiert. 


ZUNACHST ABER ZU DEN eine verschnellerte, compilierte muß unter CBASIC durch 
SCHWACHPUNKTEN Version bezahlt machen würde. „UCASE$“ ersetzt werden. 
— Die CBASIC-Schlüsselwörter un- — Als Konsequenz: Der CBASIC; 
terscheiden sich zum Teil erheb- Quelltext ist allein unter Schnei- 
— Für CPC 464-Benutzer sind die lich von denen des Locomotive- der-Basic nicht lauffähig. 


Graphikoptionen, die nur unter Basic (Schneider-Basic), so daß -— Einige Befehle bzw. Funktionen 
CPM 3.0 laufen, nicht zugänglich. ein genaues Studium des Hand- wie CATalag‘‘ oder „DIRectory“, 
Dies verärgert ein wenig, da sich buches unerläßlich wird. Bei- „CLS“, LOCATE“, „WINDOW“, 
gerade bei Graphikanwendungen spiel: das gewohnte „UPPER$“ „INK“ „PAPER“, „PEN“, „MO- 
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DE“ (die Liste ist nicht voll- 
ständig) sucht man vergebens. 
(CLS und LOCATE können je- 
doch durch PRINT-Anweisungen 
von ASCII-Steuerzeichen simu- 
liert werden.) 

— Der Compiler erstellt *.COM- 
Dateien, also CP/M-Software, die 
ohne weiteres nicht von Basic aus 
aufgerufen werden kann. 

— Ein Editor zum Erstellen des 
Quelltextes wird nicht mitgelie- 
fert. Die Benutzung von Word- 
Star bot sich in meinem Fall an. 
Der CP/M-Texteditor ED.COM 
ist ebenfalls tauglich, wenn auch 
nicht so komfortabel. 


— Die Prozedur beim Erstellen ei- 
nes Quelltextes und Compilieren 
ist relativ langwierig und um- 
ständlich: 


a) Erstellen eines Quelltextes mit 
CBASIC-Anweisungen 

b)Abspeichern des Quelltextes auf 
die CBASIC-Arbeitsdiskette 


TEST 


(NAME.BAS : Extension „BAS“ 
ist ratsam) 

c) Compiler aufrufen mit CB80 
NAME (Return) 

d) eventuelles Korrigieren des Quell- 
textes, sofern Fehler gemeldet 
werden. (Weiter : a) 

e) Linker aufrufen mit LK80 
NAME (Return) 

f) Compiliertes Programm (NAME. 
COM) starten mit NAME (Re- 
turn) 

g) bei Fehlermeldung: a) 


Da die diskettenorientierten Vor- 

gänge relativ zeitaufwendig sind 

und man besonders als Anfänger die 

Le Eee a—c sehr häufig 

wiederholen muß, bis eine ‚‚link- 

fähige“ *.REL-Datei auf der Dis- 
kette vorliegt, reißt einem schon 
manchmal der Geduldsfaden. 

— Der Compiler benötigt während 
der Übersetzung in Maschinen- 
code sehr viel Platz auf der 
Arbeitsdiskette, so daß es bei 
Verwendung eines Einzellauf- 
werkes schon einmal zur Error- 
meldung ‚Directory full“ oder 
„Disc full“ kommen kann. (Ab- 
hilfe schafft hier das Zerlegen 
eines größeren Programmes in 
mehrere kleine Einheiten, wie 
man vom Handbuch beschwich- 
tigt wird ...) 

Nach kurzer Einarbeitungszeit 
(2 Tage) konnte ich jedoch mit dem 
CBASIC-Compiler schon ganz an- 
schauliche und leistungsfähige Pro- 
gramme erstellen. Zwar bedurfte 
es einiger Klimmzüge, um die feh- 
lende LOCATE-Funktion durch die 
entsprechenden PRINT (Steuerzei- 
chenfolge ...) zu ersetzen. Das 
Handbuch hätte gut daran getan, 
einige Ersatzroutinen zur Bild- 
schirmformatierung zu erläutern. 

Eine Reihe neuer Befehle (Funk- 
tionen) machen die Enttäuschung 
über ursprünglich vermißte Schlüs- 
selwörter zum Teil wett: Auf der 
Basis strukturierten Programmie- 
rens läßt sich anschaulich mit eini- 
gen, dem Schneider-Basic unbe- 
kannten, Optionen arbeiten: 

IF EOF (End Of File) wird unter 
CBASIC mit dem „IF END #Kanal 
THEN label‘ Statement komforta- 
bel ersetzt. „ATTACH“, „DETACHS; 
„SIZE“, „LOCK“, „UNLOCK“, 
„CREATE“, „FLOAT“, „SHIFT“ 
und viele andere mehr sind einige 
Beispiele. Mit der „CONCHAR%“- 
Funktion kann der ASCI-Wert eines 
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über die Tastatur eingegebenen Zei- 
chens an eine Variable übergeben 
werden und an momentaner Cursor- 
position auf dem Monitor ausgege- 
ben werden, durch „INKEY“ kön- 
nen Tastaturabfragen auf gleiche 
Weise, jedoch ohne Bildschirmaus- 
gabe bewerkstelligt werden. Mit der 
Funktion „COMMAND$‘“ können 
Zeichenketten als Parameter für das 
CP/M Programm abgefangen wer- 
den, um beispielsweise gleich eine 
bestimmte Eingabe bei Aufruf des 
Programms zu bewerkstelligen: 
Zum Aufrufen des Programmes fügt 
man diese Zeichenkette einfach 
hinter den Programmnamen an. 
Eine kleine Kalkulationsroutine 
„CALCUL.COM“ würde unter 
CP/M durch die Eingabe CALCUL 
SOR(154-56) <ENTER> aufge- 
rufen, wodurch „SQR(154-56)“ 
als Parameter übergeben würde. 

Zur Eingabe hat man wie bei 
Schneider Basic die Wahl zwischen 
mehreren Statements: INPUT, IN- 
PUT LINE (andere Syntax!) und 
Tastaturabfragen (INKEY, CON- 
CHAR% s.o... Das INPUT #9 
(nach OPENIN) des Schneider 
Basics wird durch READ #kanal, 
Recordnummer%; (Liste der Vari- 
ablen) ersetzt. 


KOMFORTABLE STRING- 
VERARBEITUNG 


Ungewohnt, jedoch komforta- 
bel, gestaltet sich die Stringver- 
arbeitung: es können Stringvaria- 
blen (A$,BETAß...) bis zu 16kByte 
Länge verwaltet werden, was bei- 
spielsweise bei textverarbeitenden 
Systemen oder Datenbanken vor- 
teilhaft ist. Mit der MID$, LEFT$ 
und RIGHT$-Funktion kann man 
wie gewohnt unter Schneider Basic 
arbeiten, allerdings werden Argu- 
mente kleiner oder gleich Null in 
den Zusatzparametern mit Fehler- 
meldungen quittiert. Eine Instring- 
funktion (INSTR), die ich unter 
Schneider Basic als sehr komforta- 
bel empfand, entdeckte ich erst 
nach zweitem Studium des Hand- 
buches: die MATCH-Funktion des 
CBASICs ersetzt die Instringfunk- 
tion vollwertig und läßt darüber 
hinaus noch gewisse Zusatzparame- 
ter gelten wie: Jokerzeichen, die 
stellvertretend für Ziffern und/oder 
Buchstaben eingesetzt werden 
können. Der komfortable PRINT 


USING-Befehl ist bei CBASIC eben- 
falls zugänglich. 

Den größten Vorteil gegenüber 
den meisten Compilern stellt für 
meine Begriffe die unkomplizierte 
Handhabung von verschiedenen 
Variablentypen dar. Die Programme 
können Stringvariablen, Variablen 
vom Integertyp und Variablen mit 
Fließkommaarithmetik (=Real) ver- 
walten, was bei Kalkulationspro- 
grammen sehr wichtig ist. Integer- 
varıablen können entweder, wie 
gewohnt, mit dem „%“ gekennzeich- 
net werden oder zu Programmbe- 
ginn ‚mit einem DEFINT-Befehl 
definiert werden. Analoges gilt für 
die Befehle DEFREAL und 
DEFSTR, was komplette Gleich- 
wertigkeit mit dem Schneider Basic 
zur Folge hat. Trigonometrische 
Funktionen (SIN,COS,TAN...) und 
einige andere (LOG..) verwandeln 
einen Wert allerdings in eine Real- 
zahl. 

Nachteilig empfinde ich, daß 
keine Firmwarecalls aufgerufen 
werden können, mit denen ja einige 
Probleme wie fehlende Befehle wie 
PLOT, DRAW etc. beim CPC 464 
simuliert werden könnten. Der 
CALL-Befehl ruft jeweils eine vor- 
definierte mehrzeilige Funktion 
auf, was in etwa mit einer Subrou- 
tine (GOSUB) gleichzusetzen ist. 

Sehr angenehm hingegen gestal- 
tet sich das Arbeiten mit sog. 
„LABELS“. Programmteile werden 
mit einem Label (Etikett) versehen 
und können durch GOTOs oder 
GOSUBs angesprungen werden. 
Dieses ermöglicht das Erstellen von 
gut dokumentierbaren und struk- 
turierten Quelltexten (nachträgli- 
ches Auffinden von Fehlern wırd 
erleichtert). 


INITIAL: counter%=0 
DIM varible$(200): Stringvaria- 


REMk() : Realzahlen 

DIM x%(30) 
REM x%() 

: Integerzahlen 
GOTO menue 
REM Subroutine zum 
Löschen des Bildschir- 
mes 
PRINT CH$(12); 
RETURN 
GOSUB cls 
REM weitere Anwei- 
sungen ...... 


CLS: 


MENUE: 


TEST 


(In Handbuchbeispielen tauchen al- 
lerdings gelegentlich auch Zeilen- 
nummern auf ‚GOTO 100‘, was bei 
mir zunächst Verwirrung stiftete. 
Korrekt ist der GOTO-Befehl defi- 
niert als ‚GOTO label‘: in den Bei- 
spielen ist „100“ also ebenfalls ein 
Label.) 

Von großem Nutzen ist auch die 
Fehlerbehandlung, sowohl beim 
Compilieren als auch beim späteren 
Aufruf der ‚COM‘-Datei. Damit ist 
ein Entwanzen des erstellten Quell- 
textes sehr gut möglich. Im Hand- 
buch sind 117 Fehlernummern, die 
beim Compilieren mit CB80 auftre- 
ten, ausführlich dokumentiert und 
darüber hinaus noch über 30 
alphanumerische Kürzel, die bei Ab- 
lauf der erstellten ‚COM'‘-Datei bei 
Antreffen eines Fehlers ausgegeben 
werden. Der Befehl ON ERROR 
GOTO ermöglicht gleich bei der 
Programmierung eine komfortable 
Benutzerführung, bei der auch 
Fehlertexte ausgegeben werden 
können (Funktionen ERR, ERRL, 
ERRX..). 


MACHTIGES INSTRUMENT 


Ungewohnt für Schneider-Basic- 
Kenner ist der PRINT #stream- 
und der READ #stream-Befehl. Die 
Kanalnummer ‚#stream‘ wird hier- 
bei nicht WINDOWs, Drucker oder 
Diskette zugeordnet, sondern einer 
geöffneten Datenbank. Es können 
bis zu 127 verschiedene Datenfiles, 
charakterisiert durch die ‚#stream‘- 
Nummer, verwaltet werden. Damit 
ist dem Anwender ein mächtiges 
Instrument zu Erstellung einer 
komfortablen Datenbank unter 
CP/M in die Hand gelegt worden. 
Die Datenfiles können entweder als 
sequentielle (wie gewohnt unter 
AMSDOS) oder als relative Datei 
(Random Access File) verwaltet 
werden. Zusätzlich können Daten- 
sätze für den Schreibzugriff blok- 
kiert werden (LOCK-Befehl), wenn 
sie beispielsweise Programmpara- 
meter enthalten sollen. 

Die Ausgabe aller PRINT-Zuwei- 
sungen kann auf den Drucker ge- 
schickt werden durch den Befehl 
LPRINTER und wieder auf den 
Bildschirm durch die Umkehrung: 
CONSOLE. 

Mit dem Compiler sollte man 
stets Programmblöcke erstellen mit 
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Dateigröße von maximal ca. 20 K, 
um den Speicher für Daten frei zu 
halten. Trotzdem können auch 
größere Programme durch die Ein- 
bindung von sog. OVERLAY-Da- 
teien erstellt werden, die durch 
einen CHAIN-Befehl aufgerufen 
werden. Diese werden auf gleiche 
Weise erstellt wie andere Program- 
me und beim Aufruf’ des LINK- 
Programmes LK80.COM in die Ab- 
arbeitung des Hauptprogrammes 
eingebunden. An dieser Stelle fehlt 
es dem Handbuch jedoch an speziel- 
leren Anweisungen und Beispielen. 

Ein letztes Wort zur Dokumen- 
tation: Eine Vielzahl von Parame- 
tern ermöglichen die nähere Unter- 
suchung des Quelltextes und des 
Compiliervorganges. Zusatzparame- 
ter werden entweder im Quelltext 
eingegeben oder bei Aufruf des 
Compilers/Linkers vereinbart. Hier 
nur einige Beispiele: Durch den 
Zusatz ‚N‘ bei Aufruf des Compi- 
lers werden die Zeilennummern des 
Quelltextes mitgespeichert, um die 
Ausgabe von ERRL (Errline, Zeilen- 
nummer) bei Fehlerunterbrechung 
im Ablauf der *.COM-Datei zu 
ermöglichen. Die Anweisung „P“ 
protokolliert den gesamten Compi- 
liervorgang (samt Fehleranzeige) 
auf dem Drucker. Für Teile des 
Quelltextes kann die Auflistung 
durch den Befehl %NOLIST unter- 
drückt werden — Umkehrung: 
%LIST. Sämtliche Zusatzparameter 
sind beliebig kombinierbar. 

Es gäbe noch viele Beispiele 
für die unterschiedliche Syntax 
zwischen CBASIC und Locomotive 
— Basic anzuführen, die den Rah- 
men dieser Abhandlung sprengen 
würden. Im Einzelfall sollten die 
Syntaxregeln dem sehr gelungenen 
Handbuch entnommen werden. 


FAZIT 


Trotz der oben beschriebenen Un- 
zulänglichkeiten halte ich den 
CBASIC-Compiler für den leistungs- 
fähigsten Compiler, um Programme 
für die Schneider/Amstrad-Sippe, 
Diskettenstation und Betriebssy- 
stem CP/M natürlich vorausgesetzt, 
in Maschinencode zu übersetzen. 
Allerdings ist zu bedenken, daß 
Entwickler von Computerspielen 
mit einem anderen Produkt besser 
bedient wären. (Thomas Scheer) 


LISTING 


Lea 222 2222222223232 2222722223722222 272; 
11 ’x 

12 ’x* MATHE.BAS 

13 ’%* 

14 ’* A. Kienle & J. John- 
15 ’x* 

16 ’%* fuer Schneider aktiv 
17 ’x 

18 ’% fuer CPC 

19 ’%* 

20 ’%* 087 

21 ’x x 
22 ’XKKKKKKKKKIKKKKKKKIK KK III IKK IK X 
25 MODE 0: PRINT: PRINT:PRINT:PRINT" MATHE 


E = ZuE © Zur | Zur | Zur | ZuE | Zur | ZuE  Z zc \ 2 


MATIK (M) ODER 
PHYSI 

K (P) ? 

30 A$=INKEY$ 


40 IF A$="" THEN GOTO 30 

50 IF A$="M" OR A$="m" THEN GOTO 80 

60 IF A$="P" OR A$="p" THEN GOTO 6260 EL 
SE GOTO 30 

70 ’ 1. TITELBIL 


80 CLS 
90 PRINT: PRINT: PRINT: PRINT” INHALTS- ODER 
FLAECHENBEREC 
HNUNGEN ODER 
NORMALE RECHE 
NARTEN (F/N) 


100 PRINT: PRINT: PRINT"MENUE = M 

110 A$=TNKEY$:IF A$="" THEN GOTO 110 

IF A$="M" OR A$="m" THEN GOTO 10 

IF A$="N" OR A$="n" THEN GOTO 160 

IF A$="F" OR A$="f" THEN GOTO 2900 E 
LSE GOTO 110 

’2. TITELBILD 
160 MODE ] 

170 PRINT:PRINT"1 
ISION V. SUMMEN 
180 PRINT"2 BINOMISCHE FORMEN 

190 PRINT"3 LINEARE FUNKTION IM KOORDIN 
ATENSYSTEM4 QUADRATISCHE GLEICHUNG 

200 PRINT"5 POTENZEN 

210 PRINT"6 WURZELN 

220 PRINT"7 PROPORTIONEN 

230 PRINT"8 MITTELWERTE 

240 PRINT"9 RECHNEN MIT UNGLEICHUNGEN 
250 PRINT"10 LOGARITHMEN 

260 PRINT"11 IMAGINAERE U. KOMPLEXE ZAHL 


MULTIPLIKATION U. DIV 


270 PRINT"12 PROZENT- U. PROMILLERECHNUN 
280 PRINT"13 ZINSRECHNUNG 

290 PRINT"14 MONATLICHE RATENKREDTTE 

300 PRINT"15 ZINSESZINSRECHNUNG 

310 PRINT"16 BTNOMISCHER LEHRSATZ 

320 PRINT"17 GRUNDAUFG. D. KOMBINATORIK 
330 PRINT"18 DREIECK (HOEHEN,SEITENHALB. 
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340 PRINT"19 STRAHLENSAETZE 

350 PRINT"20 AEHNLICHKEIT 

360 PRINT"21 HARMONISCHE TEILUNG IM VERH 

. M:N 

370 PRINT"22 WINKELFUNKTIONEN 

380 PRINT 

390 PRINT"LEERTASTE=WEITERE FORMELN 
ANDERE TASTE=FORMEL 

400 A$=INKEY$:IF A$="" THEN 400 


410 IF A$=" " THEN 420 ELSE GOTO 480 
420 CLS 

430 PRINT"23 BERECHNUNG IM DREIECK (SIN/ 
00S) 


440 PRINT"24 STETIGE TEILUNG 
450 PRINT"25 KONGRUENTSAETZE 
460 PRINT 

470 PRINT"O=MENUE" :PRINT 


480 INPUT"FORMEL NR : ";I 
490 IF I=0 THEN 70 
500 IF I=1 THEN 760 
510 IF I=2 THEN 810 
520 IF I=3 THEN 890 
530 IF I=4 THEN 950 
540 IF I=5 THEN 1020 
550 IF I=6 THEN 1090 
560 IF I=7 THEN 1190 
570 IF I=8 THEN 1270 
580 IF I=9 THEN 1370 
590 IF I=10 THEN 1400 
600 IF I=11 THEN 1470 
610 IF I=12 THEN 1580 
620 IF I=13 THEN 1910 
630 IF I=14 THEN 1980 


640 IF I=15 THEN 2040 

650 IF I=16 THEN 2100 

660 IF I=17 THEN 2100 

670 IF I=18 THEN 2310 

680 IF I=19 THEN 2310 

690 IF I=20 THEN 2460 

700 IF I=21 

710 IF I=22 THEN 2620 

720 IF I=23 THEN 2660 

730 IF I=24 THEN 2720 

740 IF I=25 THEN 2770 ELSE 480 

750 

760 CLS:PRINT"MULTIPLIKATION U. DIVISION 

V. SUMMEN 

770 PRINT: PRINT: PRINT: PRINT"a(b+tc)=abtac 
(atb) (c+d)=zactad+be+tbd alb-c)=ab-ac 
(a-b) (c-d)=ac-ad+be-bd 

780 PRINT" (b+tc) :a=b:atc:a (a-c) (b+td)=ac+t 

ad-bce-bd 

790 PRINT" (b-c) :a=b:a-c:a (a-b) (c-d)=ac- 

ad-be+bd 

800 GOTO 2840 

810 CLS:PRINT"BINOMISCHE FORMEN 

820 PRINT:PRINT" (atb) "2=a”2+2ab+b”"2 

830 PRINT" (a-b) "2=a”2-2ab+tb”2 

840 PRINT" (a+b) (a-b)=a”2-b”2 


| LISTING 


850 PRINT" (a+b) "3=a°"3+3a°2b+3ab”2+b"3 
860 PRINT" (a-b) "3=a”3-3a”2b+3ab”"2-b”3 
870 PRINT: PRINT 
880 CGOTO 2840 
890 CIS . 
900 PRINT"LINEARE FUNKTION (GERADE) 
IM KOORDINATENSYSTEM 
910 PRINT: PRINT'"HAUPTFORM : 
Y=MX+B MIT M=Y’2’-Y’1’/X 
’2’-X’1’=TAN ALPHA 
920 PRINT: PRINT'"2-PUNKTE- BZW. 
PUNKT-STEIGUNGS-FORM : 
Y-Y’I’X-X’1’=Y’2’-Y’1/X 
‚2’_.y’’ 
Y-Y’1’/X-X’1’=M 
930 PRINT: PRINT" ACHSENABSCHNITTSFORM : 
X/A+Y/B=1 
940 GOTO 2840 
950 CLS 
960 PRINT"QUADRATISCHE GLEICHUNG 
970 PRINT: PRINT'"NORMALFORM I : 
X"2+PX+Q=0 
LOESUNG : 
X1,2=-P/2+-WURZEL VON (P 


LOESUNG : 
x1,2=-B+-WURZEL VON B”2- 
4AC/2A 
990 PRINT:PRINT"GENAU EINE LOESUNG FALLS 
I (P/2)”2-Q=0 
II B”2-4AC=0 
1000 PRINT:PRINT"SATZ DES VIETA : 
xX”2+PX+Q=0 HABE DIE LOE 


SUNG x1 UND X2, 
DANN GILT X1+X2=-P; X1* 
X2=Q; (X-X1) (X-X2)=0 
1010 GOTO 2840 
1020 CLS 


1030 PRINT"POTENZEN 
1040 PRINT:PRINT"A"MXA”N=A” (M+N); 
A”M/A”N=A” (M-N); 
A”N*B"N=(AB)”N ; 
A”N/B"N= (A/B) "N; 
(A”M) "N=A”M&N 
1050 PRINT"SPEZIELL FUR A NICHT = OÖ 
1060 PRINT"A”O=1 
A”-N=1/A”N 
(A/B) "-N=(B/A)"N 
1070 PRINT: PRINT 
1080 GOTO 2840 
1090 CLS 
1100 PRINT"WURZELN 
1110 PRINT:PRINT"UNTER WURZEL = WAS IN E 
CKIGER KLAMMER STEHT [] 
1120 PRINT"N[A]=X DANN A=X”N 
N[A]#N[B]=N[AB] 
N[A]/NIB]=N[AY/B] 


{N[A]) "M=N[TA°M] 
NIMTA] 1=MINTA] ]=MN[A] 
1130 PRINT"SPFZTELL 
1140 PRINT"NIA”N]=A 
N[A]=A” (1/N) 
NLA°”M]=A” (M/N) 
1150 PRINT"BEACHTE" 
1160 PRINT"2[A]=[A] 
1170 PRINT:PRINT 
1180 GOTO 2840 
1190 CLS 
1200 PRINT" PROPORTIONIEREN 
1210 PRINT: PRINT"VERHAELTNISGL.A/B=C/D W 
IRD ZUR PRODUKTGL . AXD=B#C 


1220 PRINT"VIERTE PROPORTIONIERTE: 
A=BC/D; B=AD/C: C=AD/B; D=BC/ 

A MITTLERE PROPORTIONIERTE: 
A/X=X/B FUEHRT ZU 
X=WURZEL VON AB 

1230 PRINT"VERHAELTNISKETTEN: 
A1/A2=B1/B2; A1/A3=B1/B3; 
A2/A3=B2/B3 ERGIEBT 
A1/A2/A3=B1/B2/B3 

1240 PRINT"UMGEKEHRTES VERHAELTNIS: 
A1l/A2=B2/B1; A1/A3=B3/B1 
AZ2/A3=B3/B2 ERGIBT 
A1/A2/A3=(1/B1)/(1/B2)/(1/B3) 

1250 PRINT: PRINT 

1260 GOTO 2840 

1270 CLS 

1280 PRINT"MITTELWERTE 

1290 PRINT: PRINT"ARITHMETISCHES MITTEL 

: M=A+B/2 


GEOMETRISCHE MITTEL 
: G=WURZEL VON AB 
1300 PRINT : PRINT"HARMONISCHES MITTEL 
: H=(2AB)/(A+B) 
1310 PRINT: PRINT" ZUSAMMENHAENGE : 

M>G>H; G=WURZEL VON HM 
1320 PRINT:PRINT 
1330 GOTO 2840 
1340 CLS 
1350 PRINT"RECHNEN MIT UNGLEICHUNGEN (A, 
B,C>0) 
1360 PRINT:PRINT"WENN A<B , DANN AtC<B+C 
A-C<B-C 
AXC<BAC 
A/C<B/C 
1/A>1/B 


1370 PRINT" -A>-B 

1380 PRINT: PRINT 

1390 GOTO 2840 

1400 CLS 

1410 PRINT"LOGARTTHMEN 

1420 PRINT"EINGABE A AUF TASTE ’10G’ DES 
TASCHENRECHNERS 


LISTING 


1430 PRINT: PRINT"X=LOG A 
10°X=A (A>O) 
SPEZIELL : LOG 1=0; LOG 
10=1 
LOG (AB) =EOGA+LOGB ; 
LOG (A/B) =LOGA-LOGB; 
1440 PRINT"TOG(A”N)=NXLOGA ; 
IOG N-TE WURZEL VON A=1/N%*LOG 


UMKEHRUNG VON A”N=B: 
A=N-TE WURZEI, VON B; 
N=LOGB/LOGA 

1450 PRINT:PRINT 

1460 GOTO 2840 

1470 CIS 

1480 PRINT"IMAGINAERE UND KOMPLEXE ZAHLE 


1490 PRINT"IMAGINAERE ZAHLEN :" 
1500 PRINT"EINHEIT : I=WURZEL VON -1 
POTENZEN: I’AN=1; 
I(4N+1)=-I 
I(AN+2)=-1 
I(4N+3)=-I 
1510 PRINT"SPEZIELL: I2=-1; 
1I”3=-I; 
I”4=1 
1520 :PRINT"KOMPLEXE ZAHLEN: 
1530 PRINT" A=REALANTEIL 
B=IMAGINAERANTEIL 
R=BETRAG VON Z(LAENGE DES PFE 
ILES (OB) ALPHA=ARGUMENT VON Z(WINKEL D 
ES PFEILS MIT DER RELLEN ACHSE(RE)) 
1540 PRINT"RECHTWINKLIGE KOORDINATEN: 
Z=AtHIB | 
1550 PRINT" POLARKOORDINATEN: 
Z=R(COS ALPHA+I SIN ALPHA) 
1560 PRINT" ZUSAMMENHANG: j 
R=WURZEL VON (A”2+B”2) 
=R COS ALPHA 
B=R SIN ALPHA 
TAN ALPHA=B/A 
1570 GOTO 2840 
1580 CLS 
1590 PRINT"PROZENT UND PROMILLE 
1600 PRINT: PRINT"PROZENT :1%=1/100=0.01 
e PROMILLE:1%.=1/1000=0.0 
01 


1610 PRINT"GRUNDGLEICHUNG : 
p: 100=P:G 
PROZENTWERT P 
P=G*p/100 

1620 PRINT" 

GRUNDWERT G 
G=100%P/p 


PROZENTSATZ PX : 
p=100xP/G 
1630 PRINT: PRINT" ’R’ =AUSRECHNEN 
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1640 A$=INKEY$:IF A$="" THEN GOTO 1640 
1650 IF A$="R" OR A$="r" THEN GOTO 1660 
ELSE GOTO 1900 

1660 CLS 

1670 PRINT"BERECHNUNGEN DER FORMELN 

1680 PRINT"WAEHLEN SIE AUS 1=GRUNDGLEICH 
UNG 2=PROZENTWERT 


1690 INPUT O 

1700 IF O-1 THEN GOTO 1710 ELSE IF 0-2 T 
HEN GOTO 1730 ELSE IF 0-3 THEN GOTO 1790 
ELSE GOTO 1850 

1710 PRINT"GRUNDGLEICHUNG : p:100=P:G 
1720 GOTO 2840 

1730 PRINT"GEBEN SIE DEN GRUNDWERT AN UN 
D DEN PROZENTSATZ! 

1740 INPUT"GRUNDWERT" ,‚G 

1750 INPUT"PROZENTSATZ" ‚p 

1760 P-G%p/100 

1770 PRINT"PROZENTWERT" :PRINT P 

1780 GOTO 2840 

1790 PRINT"GEBEN SIE DEN PROZENTSATZ UND 


1870 p=100%P/G 

1880 PRINT"PROZENTSATZ" ;p; 

1890 PRINT 

1900 GOTO 2840 

1910 CLS 

1920 PRINT" ZINSRECHNUNG 

1930 PRINT:PRINT"ZINS z 
z=KX1IxP/100 


KAPITAL K 

K=100*z/I*P 
1940 PRINT:PRINT"ZINSSATZ PX : 

P=100*z/K*1 


ZEIT I 
I=100%z2/KXP 
1950 PRINT: PRINT"TAGESZINSEN : 
z=KXT*P=Z/D 
MIT Z=K*T/100=ZINSZAHL 
D=-360/P-ZINSDIVISOR 
1960 PRINT: PRINT 
1970 GOTO 2840 
1980 CLS 
1990 PRINT"MONATLICHE RATENKREDITE 
2000 PRINT: PRINT"KREDITBETRAG K,RATE R,L 
AUFZEIT M, ZINS(% PRO MONAT) PM,GE 
BUEHREN (%) PG 
2010 PRINT: PRINT"KREDITKOSTEN IN % DES |) 


LISTING 


REDITBETRAGES 
I/K 


KP=PM&M+PG= ( (R*XM-K) % 100 


EFFEKTIEVER JAHRESZINS 
PEFF= (KP*X12)/1/2(M+1)= 
. (KPx24)/(M+1) 
2020 PRINT: PRINT 
2030 GOTO 2840 
2040 CLS 
2050 PRINT" ZINSESZINSRECHNUNG 
2060 PRINT: PRINT"ZINSSATZ P% ERGIBT ZINS 
FAKTOR @ MIT Q=1+P/100 BEI KAPTITALWA 
CHSTUM BZW. Q=1-P/100 BEI KAPI 
TALMINDERUNG. 
2070 PRINT"ENDWERT (KAPITAL NACH N JAHRE 
N) KN=K+QN 
ZINSFAKTOR 
Q=N-TE WURZEL VON (KN/K) 
BARWERT (ANFANGSKAPITAL) 
K=KN/QN 
2080 PRINT"LAUFZEIT 
N=LOGEN-LOGK/LOGQ 
2090 PRINT: PRINT:GOTO 2840 
2100 CLS 
2110 PRINT"BINOMISCHER LEHRSATZ 
2120 PRINT: PRINT" (atb) "n=a”n+(n/1)*a” (n- 
1)* b+(n/2)*a” (n-2)*b”2+(n/ 
3)ta°(n-3) +...+(n/n-1)%ab” (n-1)+b 
n 
2130 PRINT" BINOMINALKOEFFIZIENT 
(N/K)=N(N-1) (N-2).... (N-K+1)/ 
1*x2*%3...%*K 
2140 PRINT"ORDNUNGSSCHEMA 
1. A NACH POTENZEN FALLEND,BE 


GINNT MIT A”N 
2. B NACH POTENZEN STEIGEND, 
BEGINNEND MIT B”0=1 
3. INSGESAMT(N+1) SUMMANDEN 
2150 PRINT"4. BINOMINALKOEFFIZENT ERMITT 
ELN NACH DEM PASCALSCHEN DREIE 


CK; JEDE ZAHL IST DIE SUMWE DE 


DARUEBER STEHENDEN ZAHLEN 
5. FUER (A-B)"N ALTERNIEREN D 
IE VORZEICHEN ‚BEGINNEND MIT 


2160 PRINT: PRINT 

2170 GOTO 2840 

2180 CLS 

2190 PRINT"GRUNDAUFGABEN DER KOMBINATORI 
K 

2200 PRINT: PRINT" PERMUTATION 


ANZAHL DER PERMUTATIONE 
NN VONEINANDER VERSCHIEDEN 
ER ELEMENTE 
2210 PRINT"P=1%2%3...XN=N ! 
ANZAHL DER PERMUTATIONEN VON 


N ELEMENTEN,DIE IN K ARTEN ZERF 
ALLEN ;JEDE ART ENTHALTE N1,N2,N3.. 
«,NK ELEMENTE 
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2220 PRINT:PRINT "WEITER MIT LEERTASTE ! 
2230 A$=INKEY$:IF A$="" THEN 2230 

2240 IF A$=" " THEN 2250 ELSE 2230 

2250 CLS 

2260 PRINT"KOMBINATION 


EINE KOMBINATION K-TER ORDNUN 
G IST EINE KOMBINATION ZU JE K ELEM 
ENTEN ANZAHL D. KOMBINATIONEN K-TER 
ORDNUNG AUS N ELEMENTEN, JEDES ELEMENT 
TRITT 
2270 PRINT"GENAU EINMAL AUF 
A) ANORDNUNG BERUCKSICHTIGT: 
K=N(N-1) (N-2)... (N-K+1) 
B) ANORDNUNG NICHT BERUCKSICH 
TIGT K=N(N-1) (N-2)... (N-K+1)/1% 
2%23...%XK =N/K 
2280 PRINT"ANZAHL DER KOMBINATIONEN K-TE 
R ORDNUNG AUS N ELEMENTEN, JEDES ELEMENT 
KANN SICH BELIEBIG OFT WIEDERHOLEN 
A)ANORDNUNG BERUCKSICHTIGT 
=N’K 
2290 PRINT"B)ANORDNUNG NICHT BERUCKSICHT 
K=(N+(K-1)/K) 
2300 PRINT: PRINT:GOTO 2840 
2310 CLS 
2320 PRINT"DREIECK 
2330 PRINT: PRINT"WINKELSUMME 
ALPHA+BETA +GAMMA= 180GRA 


2340 PRINT"HOEHEN 
A=A*XH/2=BXH/2=C:H/2 

2350 PRINT"HA:HB:HC=1/A:1/B:1/C 

2360 PRINT"SEITENHALBIERENDE 
SCHWERPUNKT S TEILT SA,SB,SC 
IM STRECKENVERHAELTNIS 2:1 


STRECKE= {} 
2420 PRINT" {SA1}: {SB2} : {AlB1}= 
{SA2} : {SB2} : {[A2B2} 
2430 PRINT"STRAHLEN-PARALLELEN-ABSCHNITT 
E {SA1}: {SB1}={SA2} : {SB2} = 
{A1A2} : {B1B2} 
2440 PRINT: PRINT 
2450 GOTO 2840 
2460 CLS 
2470 PRINT"AEHNLICHKEIT 
2480 PRINT:PRINT"WINKEL UND STRECKENVERH 
AELTNISSE AEHNLICHER FIGUREN SIND 
GLEICH 
2490 PRINT"ZENTRISCHE STRECKUNG MIT K=M/ 
N ERGIEBT: 
AEHNLICHE STRECKEN A2=KXAl; 
A1:A2=N:M= 
U1:U2 


LISTING 


AEHNLICHE FLAECHEN A1=K”2*A1; 


2500 PRINT" A1:A2=N”2: 

M"2 AEHNLICHE KOERPER V1=K”3%V1; 
" V1:V2=N”3: 

M"3 

2510 PRINT:PRINT 

2520 GOTO 2840 

2530 CLS 

2540 PRINT"HARMONISCHE TEILUNG 

2550 PRINT"IM VERHAELTNIS M:N 


2560 
2570 
IT 


PRINT: PRINT"STRECKE= {} 

PRINT"ES GILT {AC} : {BC}= {AD} : {BD} M 
{AC} =AM/M+N; 
{BC} =AN/M+N; 
{AD} =AM/M-N; 
{BD} =AN/M-N 

PRINT" {AB} IST HARMONISCHES MITTEL 
{AC} UND {AD} 

PRINT 

2600 PRINT 

2610 GOTO 2840 

2620 CLS 

2630 PRINT"WINKELFUNKTIONEN 

2640 PRINT:PRINT"SIEHE FORMELSAMMLUNG MA 


2580 
VON 
2590 


THE=-PHYSIK AUSGABE 83 SEITE 13 
2650 PRINT: PRINT:GOTO 2840 
2660 CLS 


2670 PRINT"BERECHNUNG IM DREIECK 
2680 PRINT: PRINT"SINUSSATZ : 
A:B:C=SIN ALPHA:SIN BET 
A:SIN GAMMA A/SIN ALPHA:B/SIN BETA: 
C/SIN GAWA=ZR 
2690 PRINT: PRINT"KOSINUSSATZ : 
A”2=B"2+C”2-2BC 00S ALP 


HA; B"2=A"2+C0”"2-2AC 00S BET 
A; C”2=A"2+B"2-2AB COS GAM 
MA: 


2700 PRINT"COS ALPHA=B”2+C"2-A”2/2BC; 
COS BETA =A”"2+C0”2-B”2/2AC; 
C0S GAMMA=A”2+B”2-C”2/2AB 
2710 PRINT: PRINT:GOTO 2840 
2720 CLS 
2730 PRINT"STETIGE TEILUNG (GOLDENER SCH 
NITT) 
2740 PRINT: PRINT" (A-X) :X=X:A; 
X=A/2 (WURZEL VON 5-1)=0 
.618 A LAENGENVERHAELTNIS NACH 
DIN-FORMAT 
2750 PRINT:PRINT 
2760 GOTO 2840 
2770 CLS : PRINT"KONGRUENTSAFTZE 
2780 PRINT:PRINT"DREIECKE SIND KONGRUENT 
‚ WENN SIE UEBEREINSTIMMEN IN 
1.DREI SEITEN SSS 
2790 PRINT"2.ZWEI SEITEN UND DEM EINGESC 
HI. WINKEL SWS 
2800 PRINT"3.ZWEI SEITEN UND DEM DER GRO 
ESSEREN : SEITE GEGENUEBERLTEGENDEMWINK 
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A.EINER SEITE UND ZWEI WINKEL 


PRINT:PRINT 

GOTO 2840 

’ MENUE-ABFRAGE 
PRINT"MENUE=LEERTASTE ENDE=’E’ 
A$=INKEY$ 

IF A$="" THEN GOTO 2850 

IF A$=" " THEN 160 

IF A$="E" OR A$="e" THEN CALL O0 ELS 


E GOTO 2850 


2890 
2900 
2910 
2920 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
3010 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 


3130 
3140 
3150 
3160 
3170 
3180 


’3. TITELBILD 
MODE 1 
PRINT"1 
PRINT"2 
PRINT" 3 
PRINT"4 
PRINT"5 
PRINT"6 
PRINT"? 
PRINT"8 
PRINT"9 
PRINT"10 REGELMAESSIGES VIELECK 
PRINT"11 
PRINT"12 
PRINT" 13 
PRINT" 14 
PRINT" 15 
PRINT" 16 
PRINT"17 
PRINT"18 
PRINT"19 PYRAMIDEN 
PRINT"20 REGELMAESSIGE PYRAMIDEN 
PRINT: PRINT 
PRINT" LEERTASTE=WEITERE FORMELN 
ANDERE TASTE=FORMEL NR. 
A$=INKEY$:IF A$="" THEN 3130 
IF A$=" " THEN 3160 ELSE 3150 
GOTO 3310 
CLS 
PRINT"21 
PRINT"22 


RECHTWINKLIGES DREIECK 
GLEICHSEITIGES DREIECK 
QUADRAT 


PYRAMIDENSTUMPF 
REGELMAESSIGE PYRAMIDENSTU 


EMPFE 


3190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 


3290 
3300 
3310 
3320 
3330 


PRINT" 23 
PRINT" 24 
PRINT" 25 
PRINT" 26 
PRINT" 27 
PRINT" 28 
PRINT" 29 
PRINT"30 
PRINT"31 
PRINT"32 


KREISYLINDER 
KREISKEGEL 
KEGELSTUMPF 
ROTATIONSKOERPER 


IF I=0 THEN GOTO 70 


| LISTING 


3340 IF I=1 THEN 3680 3900 PRINT"U=AA 
3350 IF I=2 THEN 3780 3910 PRINT"E=(WURZEL 2)A 
3360 IF I=3 THEN 3870 3920 PRINT"R=(WURZEL 2)/2%*A 
3370 IF I=4 THEN 3970 3930 PRINT"RHO=A/2 
3380 IF I=5 THEN 4060 3940 PRINT 
3390 IF I=6 THEN 4140 3950 PRINT 
3400 IF I=7 THEN 4230 3960 GOTO 6220 
3410 IF I=8 THEN 4300 3970 CLS 
3420 IF I=9 THEN 4370 3980 PRINT"RECHTECK 
3430 IF I=10 THEN 4460 3990 PRINT 
3440 IF I=11 THEN 4550 4000 PRINT"A=A%XB 
3450 IF I=12 THEN 4640 4010 PRINT"U=2(A+B) 
3460 IF I=13 THEN 4740 4020 PRINT"E=WURZEL A”2+B“2 
3470 IF I=14 THEN 4800 4030 PRINT 
3480 IF I=15 THEN 4870 4040 PRINT 
3490 IF I=16 THEN 4950 4050 GOTO 6220 
3500 IF I=17 THEN 5030 4060 CLS 
3510 IF I=18 THEN 5120 4070 PRINT" PARALLELOGRAMM 
3520 IF I=19 THEN 5160 4080 PRINT 
3530 IF I=20 THEN 5210 4090 PRINT"A=A%XHa=B#Hb 
3540 IF I=21 THEN 5280 4100 PRINT"U=2(At+B) 
3550 IF I=22 THEN 5370 4110 PRINT 
3560 IF I=23 THEN 5450 4120 PRINT 
3570 IF I=24 THEN 5530 4130 GOTO 6220 
3580 IF I=25 THEN 5700 4140 CLS 
3590 IF I=26 THEN 5640 4150 PRINT"TRAPEZ 
3600 IF I=26 THEN 5700 4160 PRINT 
3610 IF I=27 THEN 5760 4170 PRINT"A=M*H 
3620 IF I=28 THEN 5830 4180 PRINT"M=A+B/2 
3630 IF I=29 THEN 5880 4190 PRINT 
3640 IF I=30 THEN 5950 4200 PRINT 
3650 IF I=31 THEN 6030 4210 PRINT 
3660 IF I=32 THEN 6120 ELSE 3320 4220 GOTO 6220 
3670 ” FORMELN 4230 CLS 
3680 CLS 4240 PRINT"RAUTE 
3690 PRINT"RECHTWINKLIGES DREIECK 4250 PRINT: PRINT"A=E*F/2 
3700 PRINT: PRINT"A,B=KATHETEN , C=HYPOTE 4260 PRINT"U=AA 
NUSE 4270 PRINT 
3710 PRINT"PYTHAGORAS :A”2+B"2=C”2 4280 PRINT 
3720 PRINT"HOEHENSATZ :H”2=P#Q 4290 GOTO 6220 
3730 PRINT"KATHETENSATZDES EUKLIED : 4300 CLS 
A”"2-C$P ,„ B”2=C3Q 4310 PRINT"DRACHENVIERECK 
3740 PRINT"THALESSATZ :JEDER WINKEL IM H 4320 PRINT: PRINT"A=E*XF/2 
ALBKREIS IST EIN RECHTER (90GRAD) 4330 PRINT"U=2(A+B) 
3750 PRINT"FLAECHE=A#B/2 4340 PRINT 
3760 PRINT: PRINT 4350 PRINT 
3770 GOTO 6220 4360 GOTO 6220 
3780 CLS 4370 CLS 
3790 PRINT"GLEICHSEITIGES DREIECK 4380 PRINT"REGELMAESSIGES SECHSECK 
3800 PRINT: PRINT" ALPHA=60GRAD 4390 PRINT: PRINT"A=3 WURZEL 3/2%*A“2 
3810 PRINT" FLAECHE= (WURZEL VON 3)/4*A”2 4400 PRINT"U=6A 
3820 PRINT"U=3A 4410 PRINT"R=A 
3830 PRINT"H=(WURZEL 3)/2*A 4420 PRINT"RHO= (WURZEL 3)/2*A 
3840 PRINT"R=(WURZEL 3)/3*A 4430 PRINT 
3850 PRINT:PRINT 4440 PRINT 
3860 GOTO 6220 4450 GOTO 6220 
3870 CLS 4460 CLS : 
3880 PRINT"QUADRAT 4470 PRINT"REGELMAESSIGES VIELECK 
3890 PRINT: PRINT"A=A”2 4480 PRINT:PRINT"TEILT SICH IN N KONGRUE 
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LISTING | 


NTE GLEICHSCHENKLIGE DREIEC 
KE 

4490 PRINT"MITTELPUNKTSWINKEL : ALPHA=36 
OGRAD/N 


4500 PRINT"R”2=(a/2)"2+RHO”2 
4510 PRINT"A=NXAXRHO/2 

4520 PRINT"U=NXA 

4530 PRINT 

4540 PRINT:GOTO 6220 

4550 CLS 

4560 PRINT"KREIS 

4570 PRINT: PRINT"PI=3,14159... 
4580 PRINT"PI/4=0,78539... 
4590 PRINT"A=PIXR"2=PI/4%D”2 
4600 PRINT"U=2%*PI*R=PIXD 

4610 PRINT"R=WURZEL VON(A/PI)=U/2*PI 
4620 PRINT: PRINT 

4630 GOTO 6220 

4640 CLS 

4650 PRINT"KREISTEILE 


: B=PI*RXALPHA/18 


4680 PRINT"MITTELPUNKTSWINKEL: 
ALPHA=180GREAD*B/PI*R 

4690 PRINT"KREISAUSSCHNITT (SEKTOR) : 
A=PIXR” 2XALPHA/360GRAD=B#R/2 

4700 PRINT"KREISABSCHNITT (SEGMENT) : 
A=CA. 2/3%SH 

4710 PRINT 

4720 PRINT 

4730 GOTO 6220 

4740 CLS 

4750 PRINT"KREISRING 

4760 PRINT 

4770 PRINT"R1,R2=AEUSSREER BZW. INNNERER 

RADIUS 

4780 PRINT"A=PI(R1”2-R2”2) 

=PI(R1”2+R2”2) (R1-R2) 

U=2PI (R1+R2) 

4790 PRINT: PRINT:GOTO 6220 

4800 CLS 

4810 PRINT"WINKEL IM KREIS 

4820 PRINT: PRINT" A=ALPHA=MITTELPUNKTSWIN 


KEL B=BETA =UMFANGSWINKEL 
Y=GAMMA=SEHNENTANGENTEN 
WINKEL 
4830 PRINT"A=2B 
B+RHO=180GRAD 
Y=B(KONSTRUKTION DES UMFANGWI 
NKELS) 
4840 PRINT 
4850 PRINT 
4860 GOTO 6220 
4870 CLS 


4880 PRINT"ELLIPSE 

4890 PRINT: PRINT"A=GROSSE HALBACHSE ; B= 
KLEINE HALBACHSE E=BRENNWEITE ; F1,F2=BR 
ENNPUNKTE 
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A=PIAB;U=CA. PI WURZEL 
VON(2(A”2-B”2)) E=WURZEL VON (A”2-B”2) 
4900 PRINT'"HAUPTKREISKONSTRUKTION 
Y=B/AXX 


GAERTNERKONSTRUKTION 
4910 PRINT"STRECKE FIP+STRECKE F2P=2A 
NAEHERUNG DURCH KRUEMMUNGSKRE 
ISE Ra=B”2/A ; Rb=A”2/B 
4920 PRINT 
4930 PRINT 
4940 GOTO 6220 
4950 CLS 
4960 PRINT"WUERFEL 
4970 PRINT 
4980 PRINT"V=A”3 
4990 PRINT"O=6A”2 


5000 PRINT 

5010 PRINT 

5020 GOTO 6220 

5030 CLS 

5040 PRINT"QUADER 

5050 PRINT 

5060 PRINT"V=ABC . 

5070 PRINT"O=2 (AB+AC+BC) 
5080 PRINT"E=WURZEL VON (A"2+B"2+C”2) 
5090 PRINT 

5100 PRINT 

5110 GOTO 6220 

5120 CLS 

5130 PRINT" PRISMA 

5140 PRINT: PRINT"V=AH 


M=-UH 

5150 PRINT: PRINT:GOTO 6220 

5160 CLS 

5170 PRINT"REGELMAESSIGE PRISMEN 

5180 PRINT: PRINT"QUADRATISCH : 
V=A”2%*H 
O=2A(At2H) 

5190 PRINT: PRINT"DREISEITIG : 
V=WURZEL VON 3 /4xA”2%*H 
O=A/2(WURZEL 3 %*A+6H) 

5200 PRINT: PRINT:GOTO 6220 

5210 CLS 

5220 PRINT"PYRAMIDEN 

5230 PRINT: PRINT"V=1/3 *%AH 


O=A+M 

M=UHs/2 

Hs=WURZEL VON (H”2+RHO“ 
2) S=WURZEL VON (H“2+R”2) 
5240 PRINT"H<Hs<S 
5250 PRINT 
5260 PRINT 
5270 GOTO 6220 
5280 CLS 


5290 PRINT'"REGELMAESSIGE PYRAMIDEN 
5300 PRINT: PRINT"WURZEL=[ ] 


LISTING 


5310 


5320 
5330 


PRINT"QUADRATISCH : 
V=1/3*A”2H 
O=A(A+2Hs) 
Hs=[H”2+A"2/4] 
S=[H”2+A”2/2] 

PRINT 

PRINT"DREISEITIG : 
V=[3]/12*A”2*H 
O=A/4([3]A+6Hs) 
Hs=[H”2+A°2/12] 
S=[H”"2+A"2/3] 

PRINT 

PRINT 

GOTO 6220 

CLS 

PRINT" PYRAMIDENSTUMPF 

PRINT: PRINT''WURZEL=[ ] 

PRINT"V=H/3(A1+[A1A2]+A2) 

PRINT"O=A1+A2+M 

=U1+U2/2*Hs 
Hs=[H”2+(RHO1-RHO2) 2] 
S=[H”2+(R1-R2) 2] 

PRINT" H<Hs<S 

PRINT: PRINT 

GOTO 6220 

CLS 

PRINT"REGELMAESSIGE PYRAMIDENSTUEMP 


WURZEL=[ ] 
PRINT"QUADRATISCH = 
V=H/3(A1”2+A1A2+A2”2) 
Hs=[H”2+1/4(A1l-A2)"2] 
S=[H"2+1/2(A1-A2)"2] 
PRINT"DREISEITIG : 
V=[3]/12%H(A1l”2+A1A2+A2”2) 
Hs=[H”2+1/12(A1-A2)”2] 


PRINT"S=[H"2+1/3(A1-A2) 2] 

PRINT 

PRINT 

GOTO 6220 

CLS 

PRINT"KREISZYLINDER 

PRINT: PRINT"V=PI#R”2*H 
0=2%*XPI*R(R+H) 
M=2*PIXR*H 

PRINT 

PRINT 

GOTO 6220 

CLS 


PRINT"KREISKEGEL 
PRINT: PRINT"V=PI/3+R”2%*H 
O=-PI*R& (R+S) 
M=PIXR*S 
S=WURZEL VON (H”2+R”2) 
PRINT: PRINT 
GOTO 6220 
CLS 
PRINT" KEGELSTUMPF 
PRINT: PRINT"WURZEL=[] 
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V=PI*XH/3(R1”2+R1R2+R2”2 

) O=PI ( (R1”2+R2”2+S(R1+R2 

)) M=PI#S(R1+R2) 

5670 PRINT"S=[H”2+(R1+R2) 2] 

3680 PRINT: PRINT 

5690 GOTO 6220 

5700 CLS 

5710 PRINT"ROTATINOSKOERPER (DREHKOFRPER 

UM EINE ACHSE) 

5720 PRINT: PRINT"S=ERZEUGENDE LINIE 
A=ERZEUGENDE FLAECHE 
R=ABSTAND SCHWERPUNKT-D 


REHACHSE 

5730 PRINT"GULDINSCHE REGEL : 

V=2*XPIXRXA E FLAEC 
HRES S 


O=2*PT*R*8 (ERZEUGENDE LINIE 
MAI: WEG IHRES SCHWERPUNKTES) 

5740 PRINT: PRINT 

5750 GOTO 6220 

5760 CLS 

5770 PRINT"KUGEL 

5780 PRINT"V=4/3*XPI*R”3=PI/6*D” 3 


HE MAL WEG I 


O=4%*PI#R”2=PI*D"2 WURZEL 
=[] R=[3V/4xPI]=1/2[0/PI] 
5790 PRINT"KUGELAUSSCHNITT : V=2/3%*PI* 
R”2*H KUGELSEKTOR : O=PI#R(2H 
+RHO) KUGELSBSCHNITT : V=PI/3*H” 
2(3R-H)= PI/6*H(3RHO”2+H”2) 

KUGELSEGMENT : O=PI(2RH+ 
RHO“2) 
5800 PRINT"KUGELSCHICHT : V=PI*H/6* 
(3RHO1”2+ 3RHO2”2+H”2) 

O=PI (RHO1 

“2+RHO2”2+ ZRH) 

KUGELHAUBE : M=2XPIXR* 
H KUGELZONE : M=2XPI*RX* 


H 


5810 PRINT: PRINT 

5820 GOTO 6220 

5830 CLS 

5840 PRINT"HOHLKUGELSCHALE 

5850 PRINT: PRINT"V=4PI/3% (R1°3-R2”3)=PI/ 
6(D1°3-D2”3 O=4PI(R1”2+R2”2) 

5860 PRINT: PRINT 

5870 GOTO 6220 

5880 CLS 

5890 PRINT"ELLIPSOID 

5900 PRINT: PRINT"A,B,C=HALBACHSEN" : PRINT 
5910 PRINT"V=4PI/3%*ABC 

5920 PRINT 

PRINT 

GOTO 6220 

CLS 

PRINT" DREHELLIPSOID 

PRINT" :?"2 A=DREHACHSE B=ZWEITE HA 
LBACHSE 

5980 PRINT: PRINT"V=4PI/3xAB”2 
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5990 PRINT 

6000 PRINT 

6010 PRINT 

6020 GOTO 6220 

6030 CLS 

6040 PRINT"FASSREGEL 

6050 PRINT 

6060 PRINT"A1,A2=GRUND- BZW DECKFLAECHE 
Amax=MAXTMALFLAECHE 

6070 PRINT 

6080 PRINT"V=H/6% (Al+A2+4Amax) 

6090 PRINT 

6100 PRINT 

6110 GOTO 6220 

6120 CLS 

6130 PRINT"FLAECHENINHALTE IM DREIECK 

6140 PRINT | 

6150 PRINT 

6160 PRINT 

6170 PRINT"SIEHE FORMELSAMMLUNG MATHE-PH 

YSIK FUER REALSCHULEN AUSGABE 1983 
SEITE 14 

6180 PRINT 

6190 PRINT 

6200 PRINT 

6210 ” MENUE-ABFRAGE 

6220 PRINT"MENUE=LEERTASTE ENDE=’E’ 

6230 A$=INKEY$:IF A$="" THEN 6230 

6240 IF a$=" " THEN 2890 

6250 IF A$="E" OR A$="e" THEN CALL O0 ELS 

'E 6230 

6260 RUN"PHYSIK 


Mathematik-Programm 


Das Programm rechnet mit den Formeln: 
— Prozentrechnen 
— Strahlensätze 
— Pythagoras 
— P-q-Formel 


(J. John u. A. Kienle) 


BASIC- 
TRICKKISTE 


Die CPC-Serie verfügt über ein ausgeklügeltes Be- 
triebssystem, in dem ungeahnte Fähigkeiten 
schlummern. Diese können auch vom BASIC aus- 
geschöpft werden, wobei das Handbuch nur spär- 
lich Hilfestellung leistet. Aber zum Glück gibt es ja 
SCHNEIDER AKTIV, das dieses Manko wieder 
ausbügelt. 


TRICKREICHE SCREENS 


Beim nachdenklichen Betrachten des Monitor- 
Bildschirms haben Sie sich vielleicht auch schon 
mal gefragt: Wie macht der CPC das eigentlich? 
Da werden drei verschiedene MODE’s zur Ver- 
fügung gestellt, Grafik und Text können beliebig 
gemischt werden und zudem gibt’s noch bis zu 16 
verschiedene Farben. Die Antwort klingt im er- 
sten Moment recht einfach — der CPC ‚merkt‘ 
sich jeden Bildschirmpunkt mit der zugehörigen 
Farbe. Doch — wie alles — hat auch diese Leistung 
ihren Preis, denn der CPC benötigt für sein Video- 
Gedächtnis satte 16 KB Speicherplatz. Dieses Ge- 
dächtnis, auch Video-RAM genannt, belegt die 16* 
1024 Speicherplätze ab der Adresse 44152 oder 
liegt — hexadezimal ausgedrückt — im Adreßbe- 
reich von &C000 bis &FFFF. Genauer gesagt, liegt 
es dort normalerweise, denn mit einem einfachen 
CALL-Befehl kann der Videospeicher in den Adreß- 
bereichvon &4000 bis &BFFF verlegt werden, 
muß jedoch dann mit MEMORY &3FFF geschützt 
werden. 

Das ist ja prima, werden Sie sagen, aber was habe 
ich denn, außer weniger Platz für BASIC-Program- 
me, von einr solchen Opera 
me, von einer solchen Operation? Ganz einfach, Ih- 
nen stehen zwei voneinander unabhängige, schnell 
auswechselbare Bildschirmseiten zur Verfügung! 
Der alte Bildschirmspeicher bleibt Ihnen nämlich 
erhalten und kann jederzeit mitsamt seinem Inhalt 
wieder in die alten Rechte eingesetzt werden. Die 
Auswahl der Bildschirm-Bank erfolgt über den 
Firmware-Vektor &BC06, wobei das High-Byte 0) 
an den CALL angehangen werden. Im Klartext: 
CALL &BC06,&40 — Zusatz-Bank wählen 
CALL &BC06,&CO — Standard-Bank wählen 

Aber das ist noch nicht alles! Denn normaler- 
weise findet die Video-Ausgabe in der gerade ange- 
wählten und damit sichtbaren Bank statt. Damit 
der CPC auch Bescheid weiß, wo er die Video-In- 
formationen ablegen kann, merkt er sich das er- 
wähnte High-Byte der aktuellen Videobank in einer 
Speicherstelle. Dies ist beim CPC 464 die Adresse 
& B1CB und beim CPC 664/6128 die Adresse 
&B7C6. Hier kann man den gewünschten Wert ‚po- 
ken‘ und in Zusammenhang mit einem MODE-Be- 


fehl den obigen CALL umgehen. Interessant wird » 


LISTING 


es, wenn nach dem CALL das Highbyte der gerade 
‚brach-liegenden‘ Bank eingetragen wird. Dann er- 
folgt die Video-Ausgabe auf der nicht-sichtbaren 
Bildschirmseite, während der aktuelle Bildschirm 
unangetastet bleibt. Ein Umschalten der Bildschirm- 
bank sorgt für einen schnellen Bildwechsel, so daß 
sich unter BASIC einfache Tricksequenzen erzeu- 
gen lassen. Ein Beispiel hierfür stellt das folgende 
Programm Bankflip dar. 

Das ‚Herzstück‘ des Programms liegt in den Zeilen 
160-200: Hier werden die Koordinaten in den DA- 
TA-Zeilen 260-290 ausgelesen und entsprechend der 
Kennung „‚P‘“ bzw. ‚„D‘‘ wird ein Punkt oder eine Li- 
nie gezogen. Um die Grafik laufend zu verkleinern, 
werden diese Koordinaten mit der Variablen ‚Faktor‘ 
multipliziert. Für die perspektivische Wanderung sorgt 
der ORIGIN-Befehl in Zeile 100: Der Ursprung des 
Grafik-Bildschirmes wird hier auf eine Reise von 
‚links unten‘ nach ‚rechts oben‘ geschickt. Für den 
Bildschirm-Wechsel und den verborgenen Grafik-Auf- 
bau sorgen — wie beschrieben — die Zeilen 140—160. 

Nun aber zurück zum Bildschirm-Speicher, dessen 
Aufbau kurz erläutert werden soll: 

Im hochauflösenden MODE 2 stehen nur zwei 
Farben, dafür jedoch 640*200 Punkte zur Verfügung. 
Ein Video-Byte enthält hier die Information von 8 
nebeneinanderliegenden Punkten. Im MODE 1 ist die 
Anzahl der ansteuerbaren Punkte auf die Hälfte redu- 
ziert — es können nur 320*200 Punkte angesprochen 
werden. Damit das Video-RAM dennoch ausgelastet 
ist, können diese Punkte doppelt soviele Zustände, 
d.h. 4 Farben, annehmen. Ein Byte kontrolliert hier 
4 nebeneinanderliegende Punkte, die jeweils doppelt 
so breit sind wie ein MODE 2-Pixel. Analog verhält es 
sich im MODE 0. Die Anzahl der Punkte wird erneut 
auf 160*200 halbiert, die Anzahl der Farben hinge- 
gen wird auf 16 verdoppelt. Ein Byte verwaltet nur 
noch zwei voneinander unabhängig ansteuerbare 
Punkte, die nun über die vierfache Breite eines MODE 
2-Pixels verfügen und deswegen auch schon etwas un- 
förmig wirken. 

Für die Informations-Ablage im Speicher haben 
sich die CPC-Konstrukteure etwas ganz besonderes 
ausgedacht, denn hier wird nicht etwa der Reihe nach 
vorgegangen. 

Der Bildschirm besteht ja aus 25 Grobzeilen, die 
ihrerseits wieder aus je 8 Pixelzeilen bestehen. Fassen 
wir diesen Sachverhalt als 25 Stapel mit 8 übereinan- 
dergeschichteten Elementen auf. Nun werden Pakete 
gebildet — die jeweils obersten Elemente bzw. Pixel- 
reihen werden der Reihe nach zusammengefaßt, dann 
die zweitobersten usw., bis 8 Pakete fertig sind. Diese 
Pakete werden nun, jeweils durch einen Puffer von 48 
Bytes (sog. „Gap‘‘) voneinander getrennt, in der Rei- 
henfolge 1-8 im Video-RAM abgelegt. Rechnen wir 
zur Sicherheit noch ‘mal nach: 25 ’gleichrangige‘ 
Pixelreihen mit je 80 Bytes bilden ein Paket von 2000 
Bytes, darauf folgt ein ‚Gap‘ mit 48 Bytes, das ganze 
8 Mal ergibt 8*2048 Bytes, was genau 16384 Bytes 
und damit den erwähnten 16 KB (=16*1024 Bytes) 
benötigten Speicherplatz ergibt. Ein Scroll-Vorgang 
macht das Ganze noch komplizierter, denn hier wird 
nicht etwa der gesamte Video-Speicherinhalt ver- 


schoben, sondern lediglich eine interne Markierung. 

Aber lassen wir das und kommen lieber von der grau- 

en Theorie zur verspielten Praxis. Dieses kleine Pro- 

gramm greift direkt in den Video-Speicher ein und 

setzt in gleichen, aber mit jedem Durchlauf größer 

werdenden Absätnden ein Video-Byte auf den Wert 

255: 

10 MODE 2 

20 DEFINT i,s 

30 FOR s=1 TO 100 

40 OFR i=&C000 TO *FFFF STEP s 

50 POKE 1,255 

60 NEXT i 

70 CLS 

80 NEXT s 
Bei den ersten Durchläufen kann man noch recht 

gut das ‚Marschieren‘ durch die einzelnen Pakete ver- 

folgen, später wird dies schwieriger, aber dafür haben 

die schnell wechselnden Strukturen und Muster ihren 

optischen Reiz. Der Wert 255 entspricht der Binär- 

Zahl 11111111, d.h. alle 8 Bits des Video-Bytes wer- 

den gesetzt. Im MODE 2 heißt das, daß 8 nebeneinan- 

derliegende Puntke auf PEN 1 gesetzt werden. Diesen 

Wert können Sie natürlich in Zusammenhang mit ver- 

schiedenen MODE.s ändern — zum besseren Kennen- 

lernen des Video-RAM’s bietet sich ein wenig Experi- 

mentier-Freude an! 


TRICKREICHE SPRITES! 


In jedem Profi-Spielprogramm schweben diese Fi- 
guren mühelos über den Bildschirm, ohne daß die 
schöne Kulisse dahinter Schaden nimmt. Versucht 
der BASIC-Programmierer ähnliches, muß er fru- 
striert feststellen, daß jede Bewegung seiner Spiel- 
figur breite Schneisen in den mühsam ertstellten 
Hintergrund schlägt. Doch .„Desperado City“ ist 
damit nicht verloren und dem „Cavern of Danger“ 
kann geholfen werden. Es geht nämlich auch an- 
ders, wie das Programm XOR zeigt. 

Steuern Sie nach dem Programmstart die Männchen 
mit den Cursor-Tasten über den Bildschirm. Wie sie 
unschwer erkennen werden, scheinen die Männchen 
vor dem Linien-Wirrwar zu schweben — und das ohne 
großen Programmieraufwand! Aber es kommt noch 
besser: Mit einem Druck auf COPY können Sie 
die Männchen wahlweise vor oder hinter die Linien 
zaubern. Diesen Umstand haben wir allein dem Steu- 
erzeichen CHR$(23) zu verdanken, mit dem verschie- 
dene Graphik-Modi ausgewählt werden können. 

Aber vorab ein kleiner Ausflug in die Aussagenlo- 
gik: Ein Byte besteht bekanntlich aus acht Bits, die 
wiederum als ‚wahre‘ oder ‚falsche‘ Aussagen angese- 
hen werden können (das soll nicht heißen, daß Bits 
lügen, sondern daß sie lediglich die Zustände 1 oder 
0 kennen). Diese Aussagen können nun auf verschie- 
dene Weise miteinander verknüpft werden, wobei das 
Ergebnis in Abhängigkeit von der Art der Verknüp- 
fung und dem ‚Wahrheitsgehalt‘ der Ausgangsaussa- 
gen wieder eine ‚wahre‘ oder ‚falsche‘ Aussage ist. Bei 
der AND-Verknüpfung ist das Ergebnis nur dann 
‚wahr‘ (=1), wenn beide Operanden wahr sind, an- 
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sonsten ist es falsch (=0). Die OR-Verknüpfung ist be- 
scheidener: hier kommt bereits eine 1 heraus, wenn 
nur einer der beiden (oder beide) Operanden gleich 
1 ist. Eine Spezialität ist nun die XOR-Verknüpfung: 
hier ist das Ergebnis dann gleich 1, wenn nur genau 
ein Operand gleich 1 ist. Haben beide Operanden den 
gleichen ‚Wahrheitsgehalt‘ (beide 1 oder 0), ist das 
Ergebnis gleich 0. 

Ob Sie’s nun glauben oder nicht — genau dieser 
XOR-Verknüpfung verdanken wir unsere „Schwebe- 
männchen‘. Wir können nämlich mit CHR$(23) die 
Verknüpfungsart von Graphik und Hintergrund be- 
stimmen. Hierbei gilt folgendes: 

PRINT CHR$(23) + CHR$(0) ergibt Normal-Modus 
(überschreiben) 
PRINT CHRSIaS\ + CHR$(1) ergibt XOR-Modus 
PRINT CHR$(23) + CHR$(2) ergibt AND-Modus 
PRINT CHR$(23) + CHR$(3) ergibt OR-Modus 

Die erste Mögichkeit ist ja von den oben erwähnten 
‚Schneisen‘ her hinlänglich bekannt. Die beiden letz- 
ten Möglichkeiten geben für graphische Experimente 
nicht soviel her, wohl aber die XOR-Graphik. Zuerst 
jedoch noch ein wichtiger Hinweis: Das Ganze klappt 
beim CPC nur in der Graphik- und nicht in der Text- 
ausgabe. XOR-Effekte lassen sich also nur mit 
Punkten und mit Linien erzielen oder nach dem TAG- 
Befehl, der die Ausgabe von Textzeichen an einer be- 
liebigen Punktposition ermöglicht. 

Jeder Punkt des Graphikbildschirms ist nun mit 
einem bestimmten Farbattribut behaftet. Im Mode 1 
stehen Ihnen 4 INK’s (0-3) zur gleichzeitigen Verfü- 
gung, und entsprechend sehen die (binären) Farb- 
attribute aus: 00, 01, 10, 11. Je nach ausgewähltem 
Modus wird nun bei der Graphikausgabe das Attri- 
but eines jeden Punktes mit dem des darunterliegen- 
den verknüpft. Dies geschieht bit-weise, d.h. das Er- 
gebnis-Attribut ergibt sich aus der Verknüpfung der 
einzelnen Stellen der binären Ausgangs-Attribute. 

In unserem Programm ergeben sich folgende Kom- 
binationen: 

PAPER auf PAPER = 00 xor 00 = 00 = PAPER 
PEN 1 auf PAPER = 01 xor 00=01=PEN1 
PEN 1 aufPEN2=01xor10=11=PEN3 

Die erste Besonderheit liegt in der letzten Kombi- 
nation. Treffen die mit PEN 1 ausgegebenen Männ- 
chen auf die in PEN 2 ausgegebenen Linien, so er- 
scheinen die ‚Kollisionspunkte‘ in PEN 3. Dies ist 
jedoch nicht direkt ersichtlich, da PEN 3 mit der 
gleichen Farbe (Nr. 26) belegt ist wie PEN 1 — die 
Männchen erscheinen intakt. Das ändert sich mit 
einem Druck auf COPY, da nun PEN 3 mit der glei- 
chen Farbe wie PEN 2 (Nr. 10) belegt wird, und nun 
erscheinen die Linien intakt. 

Das ist ja alles schön und gut, werden Sie sagen, 
aber das ließe sich auch mit der OR-Verknüpfung 
hinkriegen und wie wird denn nun der Hintergrund 
wieder repariert?! Ganz einfach — Sie geben das glei- 
che Zeichen an derselben Stelle noch einmal aus, so 
wie dies in Zeile 360 geschieht. Jetzt ergeben sich 
folgende Kombinationen: 

PAPER auf PAPER = 00 xor 00 = 00 = PAPER 
PEN 1 auf PEN 1= 01 xor 01 =00=PAPER 


Die zweite Kombination sorgt dafür, daß sich die 
PAPER-überlagernden Männchen in ‚Wohlgefallen‘ 
auflösen, und die dritte Kombination repariert die 
Linien, indem die Kollisionspunkte wieder deren 
Farbe annehmen. Wenn wir nun den ganzen Vorgang 
— punktweise verschoben — wiederholen, entsteht der 
Eindruck einer gleitenden Bewegung vor einem festen 
Hintergrund. Das Ganze funktioniert natürlich auch 
im MODE 0 und mit anderen Farben und bedingt 
auch im Mode 2, d.h. wenn Vorder- und Hintergrund 
mit demselben PEN erstellt sind. 

Schließlich sei noch erwähnt, daß sich mit den auf- 
geführten logischen Verknüpfungen auch interessante 
Rechenoperationen durchführen lassen. Diese jetzt 
jedoch im Einzelnen aufzuführen, würden den 
Rahmen des Artikels sprengen. Und noch etwas: 

Sollte Ihnen die Cursor-Abfrage in den Zeilen 290 
und 300 schleierhaft vorkommen, so lassen Sie sich 
belehren, daß im CPC ein ‚wahrer‘ Sachverhalt den 
Wert —1 und ein ‚falscher‘ den Wert 0 zugewiesen 
bekommt. Damit läßt es sich rechnen und manche 
IF-Abfragen können durch einen schnellen Arithme- 
tik-Ausdruck ersetzt werden. Der gleiche Umstand 
läßt sich auch auf Variablen anwenden, die nur zwei 
Werte annehmen. Für solche Flag’s sollten die Werte 
—1 und O0 gewählt werden, da sich dadurch IF-Ab- 
fragen auf die Firm ‘IF Flag THEN ...“ oder ‘IF NOT 
flag THEN ...‘“ beschränkt werden können. 


TRICKREICHE ZEICHEN! 


Der CPC-Zeichensatz ist schon etwas Feines: glatte 
256 Zeichen stellt er uns zur Verfügung. Moment 
’mal, werden Sie sagen, was ist denn mit den Steu- 
erzeichen CHR$(0) bis CHR$(31)? Nun, deren Be- 
deutung liegt war eher in der Funktion als Quasi- 
Befehle, aber auch ihnen sind Symbole zugeordnet, 
die mit CHR$(1) sichtbar gemacht werden können. 
Geben Sie z.B. PRINT CHR$(1)+CHR$(7) ein und 
Sie werden ein wohl die ‚Klingel‘ symbolisierendes 
Zeichen zu Gesicht bekommen. Nebenbei, wenn 
Ihnen die CHRS-Tipperei zu lästig ist — eben diese 
Symbole sind über die CTRL-Taste erreichbar und 
erfüllen, in Anführungszeichen bzw. in einen String 
gefaßt, dieselbe Funktion wie ihre CHR$-Pendants. 
Hierbei liegt CHR$(1)—-CHR$(26) in Zusammen- 
hang mit CTRL auf den Tasten A—-Z und CHR$(27) 
—CHR$(31) auf den Tästen (eckige Klammer auf), 
(ganzzahlige Division), (eckige Klammer zu), (Po- 
tenz-Pfeil) und (0). Das obige Beispiel könnte also 
auch mit PRINT ‘“«(CTRL+A) (CTRL+G)“ ge- 
schrieben werden oder — was sinnvoller ist — 


PRINT CHR$(7) kann durch PRINT “CTRL+G)“ 
ersetzt werden. 

Aber damit ist der CPC-Komfort noch lange 
nicht erschöpft — schließlich kann der Zeichensatz 
beliebig umdefiniert werden. Hierbei beginnt alles 
mit dem SYMBOL AFTER-Befehl, über dessen 
Sinn Sie sich vielleicht schon "mal Gedanken ge- 


macht haben. Der CPC braucht nämlich einen Hin-3® 
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PEN 1 aufPEN 3=01xor11=10=PEN2 
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LISTING 


weis darüber, welche seiner Zeichen, die allesamt 
im ROM stehen und damit unveränderlich sind, 
Ihnen nicht gefallen und zur Bearbeitung zur Ver- 
fügung gestellt werden müssen. Mit dem besagten 
Befehl sorgen Sie dafür, daß alle ab der angegebe- 
nenen Zeichen-Nummer liegenden Zeichen an das 
obere Ende des verfügbaren RAM’s kopiert wer- 
den. Damit dieser Bereich vor unbefugten Eingrif- 
fen geschützt ist, wird die Obergrenze. des verfüg- 
baren BASIC-Speichers nach unten verlagert. Diese 
Grenze können Sie auch ‚von Hand‘ mit MEMORY 
XXXXX verschieben und mit PRINT HIMEM ab- 
fragen. Beim Einschalten des CPC wird übrigens au- 
tomatisch ein SYMBOL AFTER 250 durchgeführt, 
so daß Ihnen standardmäßig 16 Zeichen zur Abän- 
derung zur Verfügung stehen. Da alle weiteren 
SYMBOL AFTER-Befehle ihre Kopieraktion an 
diesem, von vornherein abgesteckten Bereich orien- 
tieren, kommt es leider zu einer Unverträglichkeit, 
genauer zu einem IMPROPER ARGUMENT, 
wenn zwischenzeitlich mit MEMORY der RAM- 
TOP herabgesetzt wird und anschließend ein SYM- 
BOL AFTER erfolgt. Die ‚frisch‘ ins RAM kopier- 
ten Zeichen könnten nämlich ein — vermeintlich 
mit MEMORY geschütztes — Maschinencode-Pro- 
gramm überschreiben und das wäre nicht ‚im Sinne 
des Erfinders ...‘ 

Benötigen Sie keine ‚eigenen Zeichen, legen aber 
Wert auf etwas mehr Speicherplatz, können Sie mit 
SYMBOL AFTER 256 das RAM aufräumen und 
alle SYMBOL’s hinauswerfen. Danach wird übri- 
gens auch, einem vorangegangenen MEMORY-Be- 
fehl zum Trotz, ein nachfolgender SYMBOL AF- 
TER ohne Aufstand akzeptiert, da nun unterhalb 
des geschützten Bereiches kopiert wird und nicht 
mitten hinein! ö 

Nun aber zurück zu den im RAM ‚schlummern- 
den‘ SYMBOL’s. Jedes Zeichen besteht aus einer 
Matrix von 8 Zeilen mit je 8 — gesetzten oder nicht 
gesetzten — Punkten. Damit kann die Information 
in 8 Bytes mit je 8 Bits abgelegt werden — jede Ma- 
trixzeile ‚verschlingt‘ also genau ein Byte. Schreibt 
man in dieses Byte den Binär-Wert 1000000 (dezi- 
mal: 128), entspricht das in der Matrixzeile einem 
gesetzten Punkt ganz links. Ein Binär-Wert von 
10000001 (dezimal: 129) entspricht zwei gesetz- 
ten Eckpunkten usw. Die Matrixzeilen werden nun 
in der Reihenfolge von oben nach unten in 8 hin- 
tereinanderliegenden Bytes abgelegt und können 
mit dem SYMBOL-Befehl mit den gewünschten 
Werten beschrieben werden. Ein etwas ‚holperiges‘ 
Verfahren zwar, aber es gibt ja bequeme Editor- 
Programme, die einem viel Rechenarbeit abnehmen. 

Etwas trickreicher ist die direkte Manipulation 
der Symbol-Information, die ja — wie erläutert — 
in Achter-Paketen direkt oberhalb vom RAMTOP 
liegt. Noch ’mal zur Verdeutlichung: nach einem 
SYMBOL AFTER 32-Befehl finden wir die Infor- 
mation von CHR$(32) in den Adressen HIMEM+1 
bis HIMEM+8, CHR$(33) in den Adressen HIMEM 
+9 bis HIMEM+16 usw. In diesen Bereich kann nun 
direkt eingegriffen und interessante Möglichkeiten 
eröffnet werden. So sorgt das folgende Programm 
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für doppelt hohe Zeichen, die durch direktes Tippen 

auf den Bildschirm gebracht werden können: 

Ein bißchen Schummelei ist ja schon dabei: Dop- 
pelt so hoch sind die Zeichen natürlich nicht — sie 
werden vielmehr als solche zusammengesetzt. In den 
Zeilen 120-250 wird zuerst die Information der 
Zeichen 32—127 ausgelesen. Anschließend wird jede 
Matrixzeile verdoppelt und der obere Teil des neuen 
8-Zzeilen-Zeichens unter der ursprünglichen Zeichen- 
Nummer abgelegt. Der untere Teil wird in. die zweite 
Hälfte des RAM-Zeichensatzes ab Zeichen 128 ge- 
schrieben. In den Zeilen 340-390 wird die Tastatur 
abgefragt und e$ entsprechend gefüllt. Danach wird 
in der Zeile 500 der obere Teil des in e$ enthaltenen 
Zeichens ausgegeben und — mittels der Cursor-Steu- 
erzeichen CHR$(8)— XHR$(11) — derum 96 Zeichen- 
Nummern verschobene, untere Teil ‚unten angeklebt‘. 

Der Clou ist nun der in den Zeilen 540-650 ent- 
haltene ‚Umschalter‘. Der CPC 464 merkt sich näm- 
lich in der Speicherzelle *B295 (CPC 664/6128: 
&B735), ob im RAM Zeichensymbole stehen, auf die 
er zurückgreifen soll. Wenn ja, steht hier der Wert 
255, wenn nicht, steht hier eine 0. Dieser faszinieren- 
de Sachverhalt erlaubt es, daß man sowohl den ur- 
sprünglichen ROM-Zeichensatz verwenden kann (man 
schreibt in die Merkzelle eine 0) wie auch den um- 
definierten RAM-Zeichensatz (man poke’t den Wert 
255). So kann in unserem Programm jederzeit mit 
SHIFT+“,‘“ (=Kleiner) auf Normalausgabe und mit 
SHIFT+“.‘“(=größer) auf Großausgabe und umgekehrt 
geschaltet werden. Dieser Umstand ist auch beim 
LISTen recht behilflich und kommt deswegen auch in 
der BREAK-Behandlung zum Tragen. 

Um die Annäherung an ein Minimal-Textsystem zu 
schaffen, wird zudem die ENTER-Taste = CHR$(13) 
abgefragt, um einen Sprung an den nächsten Zeilenan- 
fang zu ermöglichen. Wenn Sie dieses Programm an 
den Rand der Nützlichkeit heranführen wollen, so sit 
Ihre SCHNEIDER AKTIVität gefragt: 

— Zuerst müßte eine Hardcopy-Routine (davon gibt’s 
schließlich genug) eingebaut und durch eine ent- 
sprechende Ergänzung in der Tastatur-Abfrage ab- 
rufbar gemacht werden. 

— wünschenswert wäre der Einbau eines sichtbaren 
Cursors und, für Ehrgeizige, der einer Editier- 
Möglichkeit. 

— schließlich sollte der Bildschirm-MODE wählbar 
sein und die Texthinweise der Zeilen 300-320 und 
620 in einem (löschbaren) Help-WINDOW stattfin- 
den. 

Wenn Sie das alles schaffen, sollten Sie sich mit 
dem neuen Programm als erstes ein stilgerechtes Pro- 
grammier-Diplom ausstellen ... 

(Olaf Panckow) 


WINDOWS WERDEN 
ZU ROLLADEN 


Bildschirmfenster sind eine feine Sache, würden 
sie nicht den aktuellen Hintergrund überschreiben 
und damit vergessen machen. Viel schöner wäre es, 
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wenn man sie — vergleichbar mit einem Rolladen — 
vor der Screen herunter- und wieder herauflassen 
könnte. Aber dem CPC kann geholfen werden! 

WONCODE stellt ein System von 5 RSX-Befeh- 
len dar, mit dessen Hilfe Fensterbereiche in einen 
Zwischenspeicher ein- und wieder ausgelesen wer- 
den können. Der zentrale Befehle ist: WON (Win- 
dow-ON), mit dem der Fensterbereich festgelegt 
wird. In seinem Gefolge stehen 7 Parameter. 

Zuerst muß bestimmt werden, ob es sich um 
einen ‚aktiven‘ oder um einen ‚stillen‘ Befehl han- 
delt. Ersterers wird mit einer 1 festgelegt und hat 
zur Folge, daß der zu überschreibende Screen-Be- 
reich in den Puffer eingelesen wird und dann das 
davorliegende Fenster in der geforderten Papier- 
farbe erscheint. Der zweite Fall wird mit einer 0 
bestimmt und übergibt ohne äußere Auswirkungen 
die Fenstergrenzen dem Betriebssystem. In beiden 
Fällen können die Fenster nach der Initiierung 
mit #1-Operationen bearbeitet werden. 

Danach folgen analog zur Syntax des WINDOW- 
Befehls die Fenstergrenzen: Linke Spalte, rechte 
Spalte, obere Zeile, untere Zeile. 

Abschließend werden die Farbstift-Nummern 
von PAPER und PEN des Fensters übergeben. 

Noch ’mal im Zusammenhang: 

:WON, (0/1) ,(links),(rechts),(oben) (unten), (Pa- 
perl,(Pen) 

Viel einfacher sind die restlichen Befehle: 

:WEX (Window-Exchange) tauscht den Screen- und 
den Pufferbereich wechselseitig aus. Nach einem 
:WON ‚1,...-Befehl bedeutet dies, daß das Fenster 
verschwindet und der ursprüngliche Bildschirm wie- 
der hergestellt wird. Ein emeuter :WEX-Befehl 
schaltet das Fenster wieder ein. 

:WIN (Window-IN) kopiert den aktuellen Fen- 
sterinhalt in den Speicher. Die im Speicher enthal- 
tene Information geht verloren. 

:WOUT (Window-OUT) ist das Gegenstück zu 
:WIN. Der aktuelle Speicherinhalt wird in das Fen- 
ster zurück-kopiert. 

In Zusammenhang mit dem :WON,0...-Befehl er- 
geben sich eine Vielzahl von Austausch-, Duplika- 
tions- und Verschiebemöglichkeiten, die sicher 
auch in Action-Spielen ihre Anwendung finden. 
Eine kleine Auswahl hiervon bietet das mitgeliefer- 
te Demo-Programm. 

Schließlich bleibt noch die Speicherorganisation. 
Der Zwischenspeicher wird unmittelbar unterhalb 
der Routine angelegt, wobei dessen Größe natur- 
gemäß recht unterschiedlich ausfällt. Nach einem 
:WON-Befehl können seine Startadresse und Länge 
mit :DAT als Hexadezimalwerte abgerufen werden. 
Damit kann der Puffer zum einen mit ‚MEMORY 
(Start)—1‘ geschützt und zum anderen mit ‚SAVE 
(Name),b,(Start),(Länge‘ abgespeichert werden. 
An anderer Stelle kann er dann wieder geladen wer- 
den und, nachdem mit :WON,O... das Fenster fest- 
gelegt ist, mit :WOUT‘ wieder ausgegeben werden. 
Natürlich muß das neue Fenster die gleichen Ab- 
messungen haben wie das ursprüngliche Fenster, 
da ansonsten fehlerhafte Ergebnisse die Folge 
wären. 
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10 ’KIREREKKKKIKIKIKKIKEKKK KK RI REIKI KIN 
11 ’* 


x 
x 
ö x 
14 ’* Olav Pankow x 
15 ’x x 
16 ’%* fuer Schneider aktiv x 
17 ’x x 
18 ’* CPC 464 x 
x 
x 
x 
x 


22 ’KKXKKKKKKKKKKKKKKEKIK KK KK KK IKK 
40 MEMORY 16383:ON BREAK GOSUB 330 

50 MODE 1:DEFINT m,n,x,y 

60 ’ xx 

70 ’ x% Verkleinerungs-Routine 

80 ’ ı* 

90 FOR m=0 TO 50 

100 ORIGIN m%12,m%6 

110 faktor=1-(m/50) 

120 ’ ** Bildschirmbank wechseln und 

130 ’ *% Betriebssystem ueberlisten 

140 IF m MD 2 = 0 THEN CALL &BC06,&C0:P 
OKE &BICB,&40 ELSE CALL &BC06,&40:POKE & 
B1CB,&C0 

150 ’ *% DATA’s graphisch umsetzen 

160 RESTORE 260:CLS 

170 FOR n=1 TO 22 

180 READ modus$,x,y 

190 IF modus$="P" THEN PLOT x*faktor,y*f 
aktor ELSE DRAW x*faktor, y*faktor 

200 NEXT n 

210 SOUND 2,0,45,,,,1+m/ 

220 NEXT m ; 

230 ’ x* 

240 ’ %* Graphik-Werte 

250 ’ ** 

260 DATA "P",200,100, "D",200,140, "D",7 
0,140, "D",70,100, "D",200,100, "D",300, 
160 

270 DATA "D",340,160, '"D",340,180, "D",3 
70,200, "D",370,187, "D",340,160,"P",340 
‚180 

280 DATA "D",298,180, "D",200,140, "P",2 
98,180, "D",298,160, "P",70,140, "D",256 
‚180 

290 DATA "D",216,180, "D",216,172, "P",2 
16,180, "D",366,200 

300 ’ x* 

310 ’ ** BREAK-Behandlung u. Ende 

320 ’ + 

330 PRINT CHR$(7):CALL &BC06,&C0:MODE 2: 
LIST 


IumEn 2222222222222 22 2277222227272 2 22777 7 
11 ’x 


x 
x 
x 
14 ’* Olav Pankow x 
15 ’x x 
16 ’%* fuer Schneider aktiv x 
17 ’x x 
18 ’x* CPC 464/664/6128 * 
19 ’x x 
20 ’x 043 * 
22 "EREKKKEKKKKKKKKKKKKKKKKKKKKKIK KK KK 
40 ON BREAK GOSUB 450 

50 MODE 1:BORDER 10 

60 INK 0,0:INK 1,26:INK 2,10:INK 3,26 
70 DEFINT a,b,n,x,y 

80 ’xx+ 

90 ° x* Hintergrund erzeugen 

100 ’ x** 

110 FOR n=1 TO 50 

120 PLOT RND*640,RND*400,2:DRAW RND%640, 
RND*400 

130 NEXT 

140 ’ xx 

150 ’ ** XOR- u. Graphik-Modus einschalt 
en 

160 ’ xx 

170 PRINT CHR$(23)+CHR$(1):TAG 

180 ’ xx 

190 ’ %% Bewegung vorbereiten 

200 ’ ** 

210 sp$=CHR$ (250) +CHR$ (248) +CHR$ (251) 
220 PIOT 0,400,1:x=288:y=216 

230 f=-1:MOVE x,y:PRINT sp$; 

240 SPEED KEY 3,3 

250 ?’ xx* e 

260 ’ ** Bewegungsroutine 

270 ’ xx 

280 IF INKEY$="" THEN GOTO 280 

290 a = -2X(INKEY(1)=0) + 2%(INKEY(8)=0) 
300 b = -22(INKEY(0)=0) + 2%(INKEY(2)=0) 
310 IF INKEY(9)=0 THEN GOTO 390 

320 IF x+ta>592 OR x+ta<0 THEN-GOTO 280 
330 IF y+b>398 OR y+b<14 THEN GOTO 280 
340 MOVE x,y:PRINT sp$; 

350 x=xta:y-y+tb 


380 ’ ** Vordergrund/Hintergrund austaus 
chen 

390 IF £f THEN f= 0:INK 3,10 ELSE f=-1:IN 
K 3,26 

400 SOUND 2,100,5,7 

410 IF INKEY(9)=-1 THEN GOTO 280 ELSE GO 
TO 410 

420 ’ 33 

430 ’ x* BREAK-Behandlung 

440 ?’ *% 


NUTZEN SIE UNSEREN BEQUEMEN POSTSERVICE 


KOMMT _ 
REGELMÄSSIG 
ZU IHNEN 


INS HAUS 


Das unabhängige Magazin 
für Schneider-Computer 


Finden Sie Ihre SCHNEIDER AKTIV nicht am Kiosk? 
Weil sie schon ausverkauft ist? Oder ‚‚Ihr‘‘ Kiosk 
nicht beliefert wurde? Kein Problem! Für ganze 60 
DM liefern wir Ihnen per Post zwölf Hefte ins Haus 
(Ausland 80 DM). Einfach den Bestellschein aus- 
schneiden — fotokopieren oder abschreiben, in ei- 
nen Briefumschlag und ab per Post (Achtung: Porto 
nicht vergessen). SCHNEIDER AKTIV kommt dann 
pünktlich ins Haus. 


GARANTIE! 

Sie können diesen Abo-Auftrag bin- 
nen einer Woche nach Eingang der 
Abo-Bestätigung durch den Verlag 
widerrufen — Postkarte genügt. An- 
sonsten läuft dieser Auftrag jeweils 
für zwölf Ausgaben, wenn ihm nicht 
vier Wochen vor Ablauf widerspro- 
chen wird, weiter. 


SS RENT IIENAEERIEEENGEEEWERIEREAENEEAIRERIGHERERFERRAERE 


ABO-SERVICE-KARTE 


Ich nehme zur Kenntnis, Ja, ich möchte von Ihrem Angebot Ausgaben an untenstehende An- 
daß die Belieferung Gebrauch machen. schrift. Wenn ich nicht vier Wochen 
erst beginnt, wenn die Bitte senden Sie mir bis auf Widerruf vor Ablauf kündige, läuft diese 
Abo-Gebühr dem Verlag ab sofort jeweils die nächsten zwölf Abmachung automatisch weiter. 
zugegangen ist! Name 

Vorname 

Straße /Hausnr. 

PLZ/Ort 

Ich bezahle: 


U] per beiliegendem Verrechnungsscheck 

gegen Rechnung 

U] bargeldios per Bankeinzug von meinem Konto 
bei (Bank) und Ort 

Kontonummer 

Bankleitzahl 

(steht auf jedem Kontoauszug) 


SCHNEIDER AKTIV 
Abo-Service 12/86 
Postfach 1107 

8044 Unterschleißheim KIIMBESEHNANL 1. 0 on ee eg re FI 


Unterschrift 
Von meinem Widerspruchsrecht habe ich Kenntnis genommen. 
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ANZEIGENSERVICE 


Die große Börse für jeden Zweck in SCHNEIDER AKTIV. Kostenlos für Privat-Inserenten. Spottbillig für gewerbliche Anbieter. Ein- 
fach Coupon ausschneiden, fotokopieren o.ä., ausfüllen und ab die Post — Freimachen nicht vergessen! — Unsere Adresse steht 
auf dem Coupon, ebenso die Preise für gewerbliche Anbieter! Achtung! Wir weisen ausdrücklich darauf hin, daß wir offensicht- 
lich gewerbliche Anzeigen nicht kostenlos veröffentlichen und uns jedweden Abdruck kostenloser Anzeigen vorbehalten müssen, 
insbesondere, wenn deren Inhalt gegen geltendes Recht verstößt. Private Chiffreanzeigen werden nicht aufgenommen. Für Pri- 
vatanbieter: etwa bis zu acht Zeilen a 28 Anschläge. Für gewerbliche Anbieter: 5 DM p.mm. bei beliebiger Größe. 


SCHNEIDER AKTIV Name 
Anzeigenabteilg. Vorname 
Postfach 1107 Straße /Hausnr. 
8044 Lohhof PLZ/Ort 


Sg 


DAS SONDERANGEBOT: 
PRIVATE KLEINANZEIGEN 
SIND KOSTENLOS 


Das bietet Ihnen ab sofort SCHNEIDER AKTIV: KLEINAN- 
ZEIGEN SIND KOSTENLOS FÜR PRIVATANBIETER! Su- 
chen Sie etwas, haben Sie etwas zu verkaufen, zu tau- 
schen, wollen Sie einen Club gründen? Coupon ausfüllen, 
auf Postkarte kleben oder in Briefumschlag stecken und 
abschicken. So einfach geht das. Wollen Sie das Heft 
nicht zerschneiden, können Sie den Coupon auch fotoko- 
pieren. Oder einfach den Anzeigentext uns so schicken, 
auf Postkarte oder im Brief. Aber bitte mit Druckbuchsta- 
ben oder in Schreibmaschinenschrift! 

Und: Einschließlich Ihrer Adresse und /oder Telefonnum- 
mer sollten acht Zeilen ä 28 Anschläge nicht überschrit- 
ten werden. 

ACHTUNG: WICHTIGER HINWEIS! 

Wir veröffentlichen nur Kleinanzeigen privater Inserenten 


kostenlos, gewerbliche Anzeigen kosten ‘pro Millimeter 
DM 5,00 plus Mehrwertsteuer! 

Wir versenden für Privat-Inserenten keine Beleg- 
Exemplare! 

DIE INSERTION IST NICHT VOM HEFTKAUF ABHÄNGIG! 
Chiffre-Anzeigen sind nicht gestattet! Wir behalten uns 
vor, Anzeigen, die gegen rechtliche, sittliche oder sonsti- 
ge Gebote verstoßen, abzulehnen! 

Anzeigenabdruck in der Reihenfolge ihres Eingangs, kein 
Rechtsanspruch auf den Abdruck in der nächsten Ausga- 
be! 

Wir behalten uns vor, Anzeigen, die nicht zum Themen- 
kreis des Heftes — Computer — gehören, nur insoweit 
zu berücksichtigen, wie es der Umfang des kostenlosen 
Anzeigenteils zuläßt. 
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DM 14,80 


ÖS 124 
SFR 14,80 


Falle Schneide 


‚Computer 


SEELE TEEN 


as3% 


new 


veczexn. 


PROGRAMMSERVICE 


Hiermit bestelle ich in Kenntnis Ihrer Verkaufsbedingun- 
gen die Listings dieses Heftes auf 


U] Kassette (20 DM) U) Diskette (30 DM) 


Ich zahle: (Zutreffendes bite ankreuzen!) 
per beigefügten Scheck [1 Schein U) 


Gegen Bankabbuchung am Versandtag U) 
Meine Bank (mit Ortsname) 
Meine Kontonummer 


Meine Bnketzah__ (steht auf jedem Bankauszug) 
Vorname_[_[[[ Nachname 
SEEN a en ne N ne nn, - 4a/RB 


Verkaufsbedingungen: Lieferung nur gegen Vorkasse oder Bankabbuchung. Keine Nachnahme. 
Umtausch bei Nichtfunktionieren. 


Unterschrift 
Bitte ausschneiden und einsenden an 


SCHNEIDER AKTIV 
KASSETTENSERVICE 12/86 
Postfach 1107 

8044 Unterschleißheim 


un. 


RESERVIERUNGS-SERVICE 
>> 


Bitte reservieren Sie mir ( ) Exemplare(e) 
SCHNEIDER AKTIV SPECIAL zum Preis vonDM 12,80 statt 14,80 
Bestellschluß: 25.11. 


Ich zahle 
D per beiliegendem Verrechnungsscheck 
D bargeldios per Bankeinzug von meinem Konto 


SCHNEIDER Name m PER 
AKTIV Straße/Hausnr.____ 2 BERATER 
Reservierungs- tz MEERE EN 

H Bei Bankabbuchung: 
Service Kto-Nr.: i Bankleitzahl_ __ 


Postfach 1107 Bei (Bank und Ort) Er ee a za 
8044 Lohhof Unterschnl 2a. ze ner EEE EEE 


Ausschneiden und bis spätestens 25.11. einsenden. 
Danach DM 14,80! 
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450 SPEED KEY 10,3 
460 PRINT CHR$(23)+CHR$ (0) 
470 MODE 2:LIST 


Lan + 22222222222 2222222222222 22322222 7% 7 
11 ’x x 
12 ’* BIGTYPE x 
13. 7% * 
14 ’* Olav Pankow x 
15 ’x x 
16 ’* fuer Schneider aktiv x 
17 ’x x 
18 ’* CPC 464 x 
19 ’x x 
20 ’x* 044 x 
21 ’x x 
22 "RRKKKKKKKKKKKKKKKKKKK KK IK KK KK KK KK X 
40 MODE 1:ON BREAK GOSUB 690 

50 SYMBOL AFTER 32 

60 BORDER 24:LOCATE 11,10 

70 PRINT "BITTE ETWAS GEDULD ....":PRINT 
80 PRINT " Der RAM-Zeichensatz wird umge 
krempelt!" 

990°’ xx 

100 ’ ** Quasi-Vergroessern des RAM-Zeic 
hensatzes 

110 ’ xx 

120 start=HIMEM+1 :ende=HIMEM+96*8 

130 FOR n = start TO ende STEP 8 

140 FOR r=0 TO 7 

150 p(r)=PEEK(n+r) 

160 NET r 

170 FOR i=0 TO 6 STEP 2 

180 adr=nti 

190 POKE adr ,‚p(i/2) 

200 POKE adr+1,p(i/2) 

210 adr=n+i+96*8 

220 POKE adr ,‚p(i/2+4) 

230 POKE adr+1,p(i/2+4) 

240 NEXT i 

250 NEXT n 

260 ’ x** 

270 ’ ** Tipp-Routine 

280 ’ ** 

290 BORDER 1:CLS: POKE &B295,0 

291 ’ CPC 664/6128: ...POKE &B735,0 
300 PRINT "Alles klar ....":PRINT 

310 PRINT "- Umschalten mit ’<’ bzw. 
>’" PRINT 

320 PRINT "- Naechste Zeile mit ’ENTER’" 
330 GOTO 610 

340 e$=INKEY$:IF e$="" GOTO 340 

350 IF e$="<" GOTO 570 

360 IF e$=">" GOTO 610 

370 IF e$=CHR$(13) THEN PRINT CHR$(7):IF 
PEEK(&B295)=0 GOTO 340 ELSE PRINT:GOTO 
340 


371 ’ CPC 664/6128: ... peek(&B735)=0 .. 


380 ON s GOSUB 430,500 

390 GOTO 340 

400 ’ *x* 

410 ’ %%* Ausgabe NORMAL 

420 ’ xx 

430 PRINT e$; 

440 SOUND 2,300,2,5 

450 IF POS(£0) > 35 THEN PRINT 


480 ’ ** Ausgabe GROSS 

490 ’ ** 

500 PRINT e$+CHR$ (8) +CHR$ ( 10) +CHR$ (ASC(e 
$)+96)+CHR$ (11); 

510 SOUND 2,200,2,5 

520 IF POS(£0) > 35 THEN PRINT: PRINT 
530 RETURN 

540 ’ ** 

550 ’ ** Umschalter 

560 ’ ** 

570 PRINT:PRINT:PRINT: POKE &B295,0 

571 ’ CPC 664/6128: ...POKE &B735,0 

580 PRINT STRING$(13,"%")" NORMAL "STRIN 
G$(14,"%*"):PRINT CHR$(7) 

590 s=1:e$="" 

600 GOTO 340 

610 PRINT:PRINT:PRINT: POKE &B295,0 

611 ’ CPC 664/6128: ...POKE &B735,0 

620 PRINT STRING$ (13,"%*")" "STRIN 
G$(14,"%*"):PRINT CHR$(7) 

630 POKE &B295,255 

631 ’ CPC 664/6128: POKE &B735,255 

640 s=2:e$="" 

650 GOTO 340 

660 ’ *x* 

670 ’ ** BREAK-Behandlung 

680 ’ x* 

690 POKE &B295,0 

691 ’ CPC 664/6128: POKE &B735,0 

700 MODE 2:LIST 


NUTZEN 
SIE 
UNSEREN 
KOSTEN- 
LOSEN ANZEIGEN- 
SERVICE 


10 ?ERERKERKEEKKERKKIKIIRKIIK III KINN 


x 
x 
x 
14 ’* Olav Panckow x 
15 ’x * 
16 ’* fuer Schneider aktiv x 
17 ’% x 
18 ’* CPC 464 x 
x 
x 
x 
x 


22 V"EREKRKREKKELKKERKKKIEKKKKIK IKK KK 
90 ’ 

100 DATA 01,0A,00,21,2C,00,CD,D1,BC,C9,1 
B,00,C3,3B,00,C3,= 1367 

110 DATA B1,00,C3,E6,00,C3,1B,01,C3,53,0 
1,57,4F,CE,57,49,= 1636 

120 DATA CE,57,4F,55,D4,57,45,D8,44,41,D 
4,00,00,00,00,00,= 1386 

130 DATA 00,00,00,00,00,00,00,00,00,00,0 
0,FE,07,C0,3E,01,= 516 

140 DATA 32,32,00,CD,BA,BB,DD,66,0A,25,D 
D,56,08,15,DD,6E,= 1709 

150 DATA 06,2D,DD,5E,04,1D,CD,66,BB,DD,7 
E,02,CD,96,BB,DD,= 2005 

160 DATA 7E,00,CD,90,BB,CD,69,BB,7B,95,3 
C,32,34,00,7A,94,= 1863 

170 DATA 3C,57,CD,1A,BC,AF,82,10,FD,32,3 
3,00,22,39,00,16,= 1354 

180 DATA 00,5F,3A,34,00,47,21,00,00,19,1 
0,FD,29,29,29,22,= 760 

190 DATA 37,00,44,4D,2A,30,00,A7,ED,42,2 
2,35,00,DD,7E,0C,= 1206 

200 DATA FE,01,C2,AB,00,CD,B1,00,CD,6C,B 
B,3E,00,CD,BA,BB,= 2136 

210 DATA C9,3A,32,00,FE,01,C0,2A,39,00,E 
D,5B,35,00,3A,33,= 1345 

220 DATA 00,47,3A,34,00,4F,C5,E5,7E,12,2 
3,13,10,FA,E1,01,= 1376 

230 DATA 00,08,09,C1,C5,E5,D2,C8,00,A7,E 
1,01,BO,3F,ED,42,= 1981 

240 DATA C1,0D,C2,C6,00,C9,3A,32,00,FE,0 
1,C0,2A,39,00,ED,= 1690 

250 DATA 5B,35,00,3A,33,00,47,3A,34,00,4 
F,C5,E5,1A,77,23,= 1119 

260 DATA 13,10,FA,E1,01,00,08,09,C1,C5,E 
5,D2,FD,00,A7,E1,= 2002 

270 DATA 01,BO,3F,ED,42,C1,0D,C2,FB,00,C 
9,3A,32,00,FE,01,= 1758 

280 DATA C0,2A,39,00,ED,5B,35,00,3A,33,0 
0,47,3A,34,00,4F,= 1041 

290 DATA C5,E5,1A,4F,7E,12,71,23,13,10,F 
7,E1,01,00,08,09,= 1348 

300 DATA C1,C5,E5,D2,32,01,A7,E1,01,B0,3 
F,ED,42,C1,0D,C2,= 2215 

310 DATA 30,01,C9,3A, 32,00, FE,01,C0,21,3 
6,00,06,02,AF,CD,= 1280 

320 DATA 7C,01,CD,7C,01,ED,6F,2B,AF,CD,7 


LISTING 


C,01,CD,7C,01,ED,= 1918 

330 DATA 6F,23,23,23,3E,20,CD,5A,BB,10,E 
3,C9,ED,6F,F5,FE,= 2083 

340 DATA 0A,30,04,C6,30, 18,02,06,37,0D,5 
A,BB,F1,C9,00,00,= 1511 

350 3 xx 46 anzupassende Werte: 

360 DATA 001,004,00A,00D,010,013,016,019 
‚030,041,06C,07A 

370 DATA 07D,083,090,095 ,09B,0A3 ,0A6 ,0B2 
‚0B8 ,OBC ,OBF,0C3 

8380 DATA 0D7 ,OE3,0E7,OED,OF1,0F4A,OF8, 10C 
‚118,11C,122,126 

390 DATA 129,12D,144,150,154,15A,160,163 
‚16A,16D 
400 ’ 

410 ? xx 
420 ’ *% 
MEMORY 
430 ?’ ** 
n 

440 ° 

450 MODE 2 
460 PRINT "Aktueller HIMEM : 
EM)" ( "HIMEM" )" : PRINT: PRINT 
470 INPUT "Startadresse : ",‚sta 

480 him = HIMEM : MEMORY sta-1 : sta =H 
IMEM+1 : PRINT 

490 IF sta > him-&18F THEN PRINT "Zu ho 
ch !":PRINT:GOTO 470 

500 IF sta < &4000 THEN PRINT "Zu niedr 
ig !":PRINT:GOTO 470 

510 adr=sta : last = adr + &18F 

520 PRINT:PRINT "WONCODE belegt Adres 
se &"HEX$(sta)" - &"HEX$(last)" (Lae 
nge: &190)" 

530 PRINT:PRINT reratänden ? (J/N)" 
540 e$=UPPER$ (INKEY$):IF e$="J" THEN 560 
550 IF e$="N" THEN MEMORY him:PRINT:PRIN 
T:GOTO 460 ELSE GOTO 540 

560 zeile = 100 : schritt = 10 

570 PRINT:PRINT "Poking ..." 

580 FOR i=1 TO 16 

590 READ byte$ 

600 POKE adr, VAL("&"+byte$) 

610 sum = sum + PEEK(adr) 

620 adr = adr + 1 

630 NEXT 

640 READ checksum$ : checksum = VAL(MID$ 
(checksum$, 3) ) 

650 IF sum <> checksum THEN PRINT:PRINT 
"Fehler in Zeile" ;zeile:END 

660 IF adr < last THEN sım = O0 : zeile = 
zeile + schritt : GOTO 580 

670 ’ %%* Routine anpassen 

680 FOR i=1 TO 46 

690 READ nr$ : nr = VAL("&"+nr$) 

700 neu = sta + PEEK(sta!mr) + 256*#P 

EEK(statnr+1) 

710 hbneu = INT (neu/256) : lbneu = 


Hier geplante 
SYMBOL AFTER , OPENOUT und 


Operationen einfuege 


&"HEX$ (HIM 


LISTING 


neu - 256*hbneu 

720 POKE statnr,1lbneu : POKE statnr+ 

1,hbneu 

730 NEXT 

740 ’ %* Routine speichern 

750 PRINT:PRINT "Nach der Initiierung mi 

t CALL &"HEX$(sta)" sind folgende RSX’e 

moeglich :" 

760 PRINT:PRINT " ıWON,<0/1>,<links 

>,<rechts> ,<oben?> , <unten? , (paper>, <pen> 

770 PRINT:PRINT " ıWIN IWOUT 
ıWEX ı DAT 

780 PRINT:PRINT:PRINT "Routine speichern 
? © _(J/N)"CHR$(7) 

790 ein$=UPPER$(INKEY$) : 

EN 810 

800 IF ein$<>"N" THEN 790 ELSE 830 

810 PRINT:PRINT "SAVING ’WONCODE’ 

&"HEX$(sta)" , &190 

820 SAVE "!WONCODE" ,b,sta,&190 

830 PRINT:END 


IF ein$="J" TH 


na 


Noch ein paar Worte zum Basic-Lader: 


Mit seiner Hilfe kann die Routine an beliebiger 
Stelle innerhalb der zentralen 32KByte, d.h. ab 
&4000, abgelegt werden — sie wird entsprechend 
angepaßt. Soll WONCODE eine Ergänzung zum 
EXTENDED BASIC aus ‘Schneider Aktiv‘ 5/86 
darstellen, sollte als Startadresse &9ABO verwen- 
det werden. In den gekennzeichneten Programm- 
zeilen müssen Sie alle diejenigen Operationen ein- 
fügen, die HIMEM herabsetzen, und auf die sie in 
Ihrer späteren Anwendung zurückgreifen wollen. 
Ein Beispiel hierfür sind die Anfangszeilen des De- 
mo-Programmes. Der Basic-Lader gibt dann den ak- 
tuellen RAMTOP aus und Sie können durch die 
Eingabe einer geeigneten Startadresse den Code 
direkt ‚unter die Decke hängen‘. Sollte es zu Kolli- 
sionen kommen, wird dies angezeigt. Nach dem 
Poking kann die Routine auf Band oder Diskette 
gesichert werden. Für das Demo-Programm ist ein 
Zugriff auf einen Code ab &9500 erforderlich. 
(Olaf Panckow) 


Die nächste 
SCHNEIDER 
AKTIV 


ist ab 17.12. 
an ihrem Kiosk 


45 


10 ?KKEKEKKKKKEKKKKEKKKKKKK EIKE EKIK INK 
11 ’x 

12 ’* WONCODE -— DEMO 

13 ’x 

14 ’* Olav. Panckow 

15 ’x 

16 ’* fuer Schneider aktiv 

17 ’x 

18 ’x* CPC 464 

19 ’x 

20 ’x 047 

21 ’x 

22 "KEREKKKEKKKKKKKKKKKKKKKKKK KK KK KK 
70 SYMBOL AFTER 255 

80 SYMBOL 255,&FE,&92,&92,&FE,&92,&92,&F 


x 
x 
x 
x 
x 
x 
x 
x 
x 
x 
x 
x 


100 MEMORY &94FF 
110 LOAD "woncode",&9500 : ’ ab &9500 er 


zeugt 
120 CALL &9500 
130 ’*% Bildschirmaufbau 


:INK 2,20:INK 3,26 
‚12:PAPER 1:PEN 2:CLs 
‚13:PAPER£3,1:CLS£3 
4,25:PAPER£2,0:PEN£2, 
2:CLS£2 

190 FOR i=1 TO 12 

200 LOCATE£2,1,i 

210 PRINT£2,STRING$(40,"£"); 

220 NEXT 

230 ’*%* Leseschleife 

240 READ m$,n 

250 FOR i=1 TO LEN(m$) 

260 PRINT MID$(m$,i,1); 

270 SOUND 2,200,2,5 " 

280 FOR pa=1 TO 150:NEXT 

290 NEXT i 

300 ON n GOTO 320,350,390,430,470,520,64 
0,670,740 

310 ’*# 1 

320 PRINT:PRINT 

330 GOTO 240 

340 ’x* 2 

350 FOR pa=1 TO 2500:NEXT 

360 PRINT:PRINT 


430 :WON,0,2,12,15,24,0,3 
440 SOUND 1,100,10,5 

450 GOTO 240 

460 ’**2 5 

470 MEMORY &BEI1F 


480 PRINT 
490 !WON,1,15,25,15,24,0,3 

500 GOTO 390 

510 ’*3 6 

520 PRINT£1,CHR$ (150) ;STRING$ (9,CHR$ (154 
)) ;CHR$ (156); 

530 LOCATES1,1,10 

: 540 PRINT£1,CHR$ (147) ;STRING$ (9,CHR$ (154 
)) ;CHR$(153); 

550 FOR i=2 TO 9 

560 LOCATES1,1,i:PRINT£1,CHR$(149) 

570 LOCATE£1,11,i:PRINT£1,CHR$ (149) 

580 NEXT 

590 FOR i=3 TO 7 STEP 2 

600 LOCATE£1,3,i:PRINTS1, "WIN"CHR$ (255) " 
DOW" 

610 NEXT 

620 ’** 7 

630 GOTO 240 

640 !WEX 

650 GOTO 240 

660 ’** 8 

670 !WIN 

680 !WON,0,14,24,15,24,0,3 

690 !WOUT 

700 !WON,0,26,36,15,24,0,3 


750 e$=UPPER$ (INKEY$):IF e$="J" THEN RES 
TORE:GOTO 140 

760 IF e$="N" THEN END ELSE GOTO 750 

770 GOTO 750 

780 ’*%* Text- u. Sprung-DATA’S 

790 DATA "WINDOW£1 initiieren mit",1 

800 DATA "!WON,1,15,25,15,24,0,3" ,1 

810 DATA "( aber vorher MEMORY &8EIF ein 
geben," ,1 

820 DATA " da bei dem Routinenstart von 
&9500" ‚1 

830 DATA " !DAT die Werte &8E20 &6EO aus 
gibt )",5 

840 DATA "Window mit £1 - Operationen ge 
stalten”,6," ",2 

850 DATA "und mit !WEX ausschalten ...." 
7," "2 

860 DATA "und mit !WEX wieder einschalte 
a ar Per | 

870 DATA "Window verschieben mit :",1," 
“el 

’ 

880 DATA "!WEX",7," : !WON,0,2,12,15,24, 
0,3 ",4,”" 2 IWEX",7," ",3 

890 DATA "Window vervielfaeltigen mit"”,1 
900 DATA "!WIN",1,"!WON,O,...-Operatione 
n",1,"!WOUT",8 

910 DATA " ",3," ... UND VIELES MEHR '!", 
2 "9 


LISTING 


DARWIN- 
EXPERIMENT 


Software-Experimente sind in letzter Zeit ja groß 

in Mode — SCHNEIDER AKTIV will da nicht zu- 

rückstehen! Der Computer macht’s schließlich 

möglich: Ein Modell der Wirklichkeit wird durch 

den Zeitraffer der Mikro-Elektronik gejagt und der 

Experimentierende braucht lediglich — gemütlich _ 
zurückgelehnt — zuzusehen, was in seiner kleinen 

Welt passiert. 

In unserem Beispiel soll sich der CPC die Evo- 
lutionstheorie von Darwin vorknöpfen. Darwin 
legte sich Mitte des letzten Jahrhunderts mit der 
biblischen Schöpfungsgeschichte an und sagte, 
daß nicht etwa himmlische Schöpfung, sondern der 
Zufall für die Entstehung und den Wandel der ver- 
schiedenen Lebensformen verantwortlich sei. 
Dieser nütze einen von der Natur vorgegebenen 
Spielraum aus und sorge bei der Fortpflanzung in- 
nerhalb einer Art für zahlreiche, wenn auch gering- 
fügige Abweichungen von der Muttergeneration. 
Diese Mutationen werden nun, so meint Darwin, 
nach dem Prinzip „Survival of the Fittest‘‘ einem 
Auswahlverfahren unterzogen, d.h. die zufällig 
am besten den Gegebenheiten eines Lebensraumes 
angepaßten Art-Varianten genießen die größte Lust 
am Leben, vermehren sich daher am stärksten und 
bestimmen so die zukünftige Marschrichtung für 
den Artenandel. Diese zufallsgesteuerte Flexibili- 
tät erlaube zudem die Anpassung an sich ändernde 
ökologische Gegebenheiten und das Erschließen 
neuer Lebensräume. 

Nun wäre es zuviel vom CPC verlangt, sollte er 
die Entwicklung vom primitiven- Einzeller zum 
komplexen Mehrzeller simulieren. Unser Beispiel 
spielt sich daher auf einem mehr theoretischen Ni- 
veau ab — der Ursprung allenLebens wird durch 
eine wild gefaltete Zickzack-Linie dargestellt. Pro 
Generation werden zehn Mutanten erzeugt, die sich 
jeweils in einer einzigen, zufällig gewählten Faltung 
unterscheiden. Als Anpassungs- bzw. Selektionskri- 
terium dient uns die Linienlänge, d.h. ‚überleben‘ 
darf nur die Variante, die die jeweils kürzeste Ver- 
bindung zwischen den Eckpunkten darstellt. ‚Über- 
leben‘ heißt in diesem Fall, daß diese Variante den 
Prototyp für die nächste Generation darstellt. Das 
ist zwar eine simplifizierende und reichlich strenge 
Auswahl, aber für den Demonstrationszweck reicht 
es allemal. 

Zum Programm: Im unteren Bilschirmteil mu- 
tiert die Ausgangslinie munter vor sich hin, jeweils 
mit einer Nummer und der aktuellen Länge ge- 
kennzeichnet. Um eine simultane, und damit nach- 
vollziehbare, Ausgabe einer Linie und deren Länge 
zu ermöglichen, müssen im BASIC leider einige 
‚Verrenkungen‘ vorgenommen werden: Nach der 
Ausgabe eines Mutanten steht der nächste bereits 
fest und wird berechnet. Findet der CPC einen 
neuen ‚Champion‘, wird dieser in den oberen Bild- 
schirmteil kopiert. Bei einem Generationswechsel 


LISTING 


Irre er sr Fr er Sr > Fr 3 2 2 2 3 2 2 2 2 2 2 2 222227 


x 
x 
x 
14 ’* Olav Pankow x 
15 ’* x 
16 ’%* fuer Schneider aktiv x 
17 ’x x 
18 ’* CPC 464/664/6128 * 
x 
x 
x 
x 


22 ’ERRKKKKKKKKKKKKKKKKIKK KK KK KK K KK 
40 INK 0,0:INK 1,25:INK 2,20 

50 MODE 1:PAPER 0:PEN 1:BORDER 0 

60 LOCATE 14,5:PRINT "** DARWIN *%%*":PEN 
2 

70 LOCATE 10,8:PRINT "Mutation & Selekti 
on" 

80 LOCATE 2,10:PRINT "am Beispiel einer 
Strecken-Optimierung" 

90 PEN 1:LOCATE 5,14:PRINT ">SPACE< stop 
pt den Programm-Ablauf" 

100 LOCATE 5,16:PRINT ">ENTER< fuehrt zu 
r Auswertung" ’ 

110 PEN 2:LOCATE 16,21:PRINT CHR$(24)"<T 
aste>"CHR$ (24) 

120 SOUND 2,100,5,5 

130 WHILE INKEY$="":WEND 

140 

150 ?° * Intialisierung 

160 ’ 

170 MODE 2:BORDER 25:ZONE 7 

180 RANDOMIZE TIME:PRINT CHR$(23)+CHR$ (1 


) 

190 WINDOW£0,1,80,3,23:PAPER 0:PEN 1 

200 WINDOW£1,1,80,24,25:PAPER£1,1:PEN£1, 
0 

210 WINDOW£2,1,80,1,2:PAPER£2,1:PEN£2,0 

220 DIM y(10),1(10) 

230 DIM oy(10),01(10) 

240 DIM gy(10,200) ,g01(200) 

250 flag=-1:g=1 

260 EVERY 10,0 GOSUB 1870 

270 ’ 

280 ’ * Bilschirm-Design 

290 ?’ 

300 CLS£O:CLS£1:CLS£2 

310 MOVE 20,200:DRAW 620,200 

320 FOR n=20 TO 620 STEP 60:MOVE n,366:D 
RAWR 0,-334 :NEXT 

330 TAG 

340 MOVE 14,106:PRINT ">";:MOVE 14,306:P 
RINT "50 

350 MOVE 620,106:PRINT "<";:MOVE 620,306 
:PRINT ne 

360 TAGOFF 

370 LOCATE£1,3,2:PRINT£1,"Unten: AKTUELL 
ER MUTANT "CHR$(24)" GENERATION 1 " 


380 LOCATE£1,46,2:PRINT£1,". O0 "CHR$(24) 
” Oben: BESTER MUTANT" 

390 LOCATE 4,10:PRINT "LAENGE: " 

400 LOCATE A,12:PRINT "LAENGE: " 

410 y(0)=100:y(10)=100 

420 ° ’ 

430 ’° % Untere Kurve bei Generationswech 
sel zeichnen 

440 °’ 

450 x=20 

460 FOR n=1 TO 10 

470 IF flag AND n<10 THEN y(n)=50+INT(R 
ND*%100)+1 

480 MOVE x,y(n-1l) 

490 x=x+60 

500 DRAW x,y(n) 

510 NET n 

520 GOSUB 1050:LOCATE 12,12:PRINT USING 
"EE£.£";ROUND(laenge(g) ,‚1) 

530 IF flag THEN GOSUB 1170 ELSE FOR pa= 
1 TO 500:NEXT pa:BORDER 25 

540 ’ x 

% Untere Kurve muıtieren 

x 


x Vorlaeufer bestimmen 


ul 
[er] 
oO 


600 q=1:n(1)=INT(RND%9) :wy(1)=50+INT(RND 
*100)+1 

610 ry=y(n(1)+1):y(n(1)+1)=wy(1):GOSUB 1 
050:y(n(1)+1)=ry 

620 °’ 

630 °’ 

640 FOR m=1 TO 10 

650 n(q XOR 1)=INT(RND*9):wy(q XOR 1)=5 
O+INT(RND*100)+1: ° * Nachfolger bestimm 


en 
660 x=n(q)*60+20 


670 ry=y(n(q)+1):y(n(q)+1)=wy(q) 
680 MOVE x,y(n(q)) : ”° * Mutant zeichne 


n 

690 DRAW x+60,ry 

700 DRAW x+120,y(n(q)+2) 

710 MOVE x,y(n(q)) 

720 DRAW x+60,y(n(q)+1) 

730 DRAW x+120,y(n(q)+2) 

740 LOCATE£1,47,2:PRINT£1,CHR$(24) ;m;CH 
R$(24); 

750 SOUND 2,200,3,3:LOCATE 12,12:PRINT 
USING "£££.£";ROUND(laenge(q) ‚1) 

760 IF laenge(q)<olaenge THEN SOUND 2, 
100,5,4:G0OSUB 1240:G0SUB 1170:’ * Selekt 
ionskriterium 

770 qgzq XoR 1 

780  rry=ry:ry=-y(n(q XOR 1)+1):y(n(q XO 
R 1)+1)=rry 

790 rrry=y(n(gq)+t1):y(n(q)+1)=wy(q) :GOS 
UB 1050:y(n(q)+1)=rrry:’ % Nachfolger be 
rechnen 


LISTING 


800 MOVE x,y(n(q XOR 1)) : ’ % Zurueck 
zur Ausgangskurve 

810 DRAW x+60,ry 

820 DRAW x+120,y(n(q XOR 1)+2) 

830 MOVE x,y(n(q XOR 1)) 

840 DRAW x+60,y(n(q XOR 1)+1) 

850 DRAW x+120,y(n(q XOR 1)+2) 

860 SOUND 2,500,3,3 

870 NKXTm 

880 ’ * 

890 ’ % Untere Kurve loeschen 

900 ’ % 

910 BORDER 15 

920 SOUND 2,478,18,5:SOUND 2,426,6,5:SOU 
ND 2,379,12,5 

930 xn=20:MOVE 20,y(0) 

940 FOR i=1 TO 10 

950 xn=xn+t60 

960 DRAW xn,y(i) 

970 NEXT i 

980 g=g+1:IF g<=200 THEN gol(g)=olaenge: 
FOR i=0 TO 10:gy(i,g)=oy(i)-250:NEXT i 
990 LOCATE£1,42,2:PRINT£1,CHR$ (24) ;g;CHR 
$(24) “ 

1000 FOR n=0 TO 10:y(n)=oy(n)-200:NEXT n 
1010 GOTO 450 

1020 ’ * 

1030 ’ % Laenge berechnen 

1040 ’ % 

1050 laenge(q)=0 

1060 FOR i=1 TO 10 

1070 xq=60”2 

1080 yq=(y(i-1)-y(i))”2 

1090 1(i)=SQR(xqtyag) 

1100 laenge(q)=laenge(q)+l(i) 

1110 NEXT i 

1120 RETURN 

1130 LOCATE 12,12:PRINT USING "£££.£"”;RO 
UND(laenge,1) 

1140 ’ x 

1150 ’ % Obere Kurve loeschen und neu ze 
ichnen 

1160 ’ * 

1170 FOR i=0 TO 10:oy(i)=y(i)+200:01l(i) 
=l(i):NEXT i 

1180 IF flag THEN flag=0:gol(1)=laenge(q 
):FOR i=0 TO 10:gy(i,1)=y(i)-50:NEXT i 
1190 olaenge=laenge(q) 

1200 LOCATE£2,3,1:PRINT£2,"L :", 

1210 FOR i=1 TO 10:PRINT£2,ROUND(ol{i)) 
‚„:NEXT i 

1220 LOCATE 12,10:PRINT USING "Z££.£";RO 
UND(olaenge,1) 

1230 ’ 

1240 ox=20 

1250 FOR i=1 TO 10 

1260 MOVE ox,oy(i-1) 

1270 ox=0x+60 

1280 DRAW ox,oy(i) 


1290 NEXT i 

1300 RETURN 

1310 ’ x 

1320 ’ * End-Auswertung 

1330 ?’ * 

1340 BORDER 25:CLS£0:CLS£1:CLS£2 

1350 sp=6:2=1:g0=MIN(g,200) 

1360 LOCATE£2,22,1:PRINT£2,CHR$(7)"** AU 

SWERTUNG von"g"GENERATIONEN **" 

1370 LOCATE£1,25,2:PRINT£1,"Optimm (ger 

ade Strecke) = 600" 

1380 FOR i=1 TO go 

1390 LOCATE sp, 2*2 

1400 PRINT "G"i":";USING "£££.£" ;ROUND( 

gol(i),1); 

1410 IF i>1 THEN d=gol(i)-gol(i-1):PRIN 

T " /"sUSING "£££.£";d 

1420 z=z+1 j 

1430 IF i MOD 10=0 THEN z=1:sp=spt25 
1440 IF i MD 30=0 THEN sflag=-1:2=1:sp 
=6:GOSUB 1720 

1450 NEXT i 

1460 IF sflag THEN GOSUB 1790 ELSE GOSUB 
1720 

1470 IF eflag THEN GOTO 1340 

1480 ’ 

1490 ’ * End-Darstellung 

1500 ?’ 

1510 CLS£O:CLS£1:sflag=0 

1520 LOCATE£1 ,26,2:PRINT£1,CHR$(7)"”- Anp 

assung durch Selektion -"; 

1530 £fx=600/192:fy=100/32 

1540 px=2:py=2:xu=16:yu=302 

1550 FOR i=1 TO go 

1560 LOCATE px,py:PRINT i 

1570 x=0:ORIGIN xu,yu 

1580 MWE x/fx,gy(0,i)/fy 

1590 FOR n=1 TO 10 

1600 x=x+60 

1610 DRAW x/fx,gy(n,i)/fy 

1620 NEXTn 

1630 py-py+4:yu=yu-64 

1640 IF i MOD 5 =0 THEN py=2:yu=302:px= 

px+26 :xu=xu+208 

1650 IF i M%D 15=0 THEN sflag=-1:m=2:p 

y=2:xu=16:yu=302:GOSUB 1720 

1660 NEXT i 

1670 IF sflag THEN GOSUB 1790 ELSE GOSUB 
1720:eflag=0 

1680 IF eflag THEN GOTO 1510 ELSE RUN 
1690 ?’ * 

1700 ’ % Tastatatur-Abfragen 

1710’ x 

1720 WHILE INKEY$<>"":WEND 

1730 LOCATE£1,6,2:PRINT£1,CHR$(24)"<Tast 

e>"CHR$ (24) 

1740 SOUND 2,100,5,5 

1750 WHILE INKEY$= "":WEND 

1760 LOCATE£1,6,2:PRINT£1," 2 


LISTING 


1770 CLS£O :RETURN 

1780 ’ 

1790 CLS£1:SOUND 2,100,5,5 

1800 LOCATE£1,20,2:PRINT£1,CHR$(24)" Auf 
listung noch ’mal von vorne ? (J/N) "CH 
R$(24); 

1810 e$=UPPER$ ( INKEY$) 

1820 IF e$="J" THEN eflag=-1:G0TO 1850 
1830 IF e$="N" THEN eflag=0:G0TO 1850 
1840 GOTO 1810 

1850 CLS£1:RETURN 

1860 ?’ 

1870 WHILE NOT (INKEY(47)) :WEND 

1880 IF NOT(INKEY(18)) THEN 1340 

1890 RETURN 


steigt dieser von seinem hohen Roß herunter und 
stellt die Vorlage für weitere Mutationen. 

Das Ganze geht recht fix vor sich — oben war ja 
von einem Zeitraffer die Rede — der Prozeß kann 
jedoch zum genaueren Studium durch Drücken der 
SPACE-Taste angehalten werden. ENTER führt 
zum Abbruch der Mini-Evolution und zu einer Aus- 
wertung. Zuerst sprechen Zahlen — es werden die 
sich in der Generationenabfolge wandelnden Län- 
gen-Werte gelistet. Dann folgt — als Bonbon — im 
verkleinerten Maßstab die Abfolge der jeweiligen 
Generations-Prototypen. Hier kann dann besonders 
schön die Entwicklung von der grobschlächtigen 
‚Neandertal‘-Linie bis hin zur abgeschliffenen ‚Homo 
sapiens‘-Linie beobachtet werden. 

Olaf Pankow 


CROSS- 
REFERENZ- 


ANPASSUNG 
ANDEN 
CPC 6128 


In der Ausgabe Schneider aktiv 8/86 veröffentlich- 
ten Sie das Programm CROSSREFERENZ. Leider 
läuft das Programm so nur auf dem CPC 464. Ich 
habe dieses Programm für den CPC 6128 angepaßt 
und möchte Ihnen diese Anpassung nicht vorent- 
halten. Diese Version dürfte auch auf dem CPC 
664 laufen. 
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1. Das Programm CRLOAD.BAS wird nicht benö- 
tigt (Maschinenroutine führt auf CPC 6128 zum 
Absturz!) 

2. CROSSREF.BAS 
— Zeile 65210 weglassen 
— Zeile 65214 weglassen 
— Zeilen 65353 — 65383 weglassen 
Das Folgende ist nicht notwendig, ermöglicht 
aber, Programme bis Zeilennummer 65299 zu 
analysieren: 


- In Zeile 65215: KEY 139,"RUN 65315" +CHR$ (13) 
- In Zeile 65280: IF b < 65300 THEN 65286 

- RENUM 65300, ,1 . 

(In dieser Reihenfolge? 


3. CRAUSG. BAS 


- Zeile 40 weglassen 

- Zeile 50 weglassen 

- Zeile 640 : IF UPPER$(as)="J" 
- Zeile 1020 : GOSUB 50000 
Zeile 1255 : zz=zzt+1 


THEN IERA,"CRDATEI. #" 
REM Sortier-Routine 


I 


Als Sortierroutine habe ich den Shell Sort gewählt. 
Der Quick-Sort ist zwar schneller, doch weiß ich 
nicht, wie man bei Strings eine sinnvolle Mittel- 
wertbildung erreicht, wie sie beim Quick-Sort er- 
forderlich ist, um die Felder zu teilen. Man könnte 
zwar die Strings in Zahlen umwandeln und dann 
den Mittelwert bilden, jedoch wird dann für die 
Umwandlungsfunktionen mehr Rechenzeit verwen- 
det, als man durch das Verfahren spart. Der Shell- 
Sort ist nach dem Quick-Sort das am schnellsten 
mir bekannte Sortier-Verfahren. Man kann aber 
auch andere Verfahren wählen (evtl. Maschinen- 
Programme). Ein _Diskettensortierprogramm 
könnte übrigens bei großen Datenmengen sinnvol- 
ler sein, um die auftretende Zerstückelung der 
Listen in mehrere Teillisten zu vermeiden. Die be- 
ste Lösung wäre meines Erachtens die, das schon 
im Programm CROSSREF das Schreiben auf Dis- 
kette sortiert erfolgt (entweder als binärer Baum 
oder im Hash-Verfahren. Um dies sinnvoll zu reali- 
sieren, braucht man allerdings MC-Routinen, die 
eine relative Dateiverwaltung erlauben). Hier aber 
nun die einfachste Lösung, der Shell-Sort: 


50000 '#n###nE HERE RE EEE 
50010 '® SHELL-SORT * 
50020 'aunannaaER Heer 
50030 tf=as 

50040 ende=0 

50050 WHILE NOT ende 

50060 
50070 
50080 
50090 


tf=tf 02 
if tf<=1 THEN ende=-1 
FOR ii=1 TO as-tf 
FOR jj=i1i TO 1 STEP -tf 
50100 IF vts(cjj+tf)>vtscjj) THEN Jj=1:GOTO 50110 ELSE 50105 
50105 helps=vts(cjj+ttf):vtscjj+ttf)=vts(jj):vts(cjj)=helps 
50110 NEXT jj 
50120 NEXT ii 
50130 WEND 


50140 RETURN 


Als letzte Verbesserung könnte man, wenn man 
bei diesem Verfahren bleibt, in den Zeilen 70,850 
und 900 die ‚1000° durch ‚1500‘ ersetzen. Damit 
lassen sich dann die meisten Programme analy- 
sieren. (Günter Bing) 


LISTING 


SENSO 


Mit dem folgenden Programm liegt eine Originalko- 
pie des MB-Spiels „Senso“ vor. Falls Sie das Spiel 
noch nicht kennen sollten, tippen Sie das Pro- 
gramm doch einfach ein oder lesen Sie im Listing 
ab Zeile 320 nach! 

Der Ablauf des Programmes ist wie folgt: Nach 
dem Start wird eine Datei abgespeichert, sofern 
Sie Senso noch nie gespielt haben. In dieser Datei 
steht die Variable „highnotenl‘“ mit dem Wert 10, 
der in Zeile 160 vorgegeben worden ist (kann be- 
liebig geändert werden). Hier wird später Ihr aller 
bester High-Score stehen. 

Dieser ganze Vorgang ist notwendig, da im Falle 
des Überbietens des Wertes von „highnoten1l“ 
(10) der CPC eine Datei einschließt, um den alten 
gespeicherten mit dem aktuellen Wert zu verglei- 
chen. 

Nach der Abfrage, ob die Spielregel bekannt ist 
und des Levels, wird die Haupt-Screen mit unge- 
wöhnlich schnellen Basicroutinen aufgebaut. Das 
eigentliche Spiel findet in den Zeilen 990—1290 
statt. Beim Abbruch des Spieles durch Fehler o.ä. 
verzweigt Ihr CPC zu den Zeilen 1990, 2120, 2070 
und speichert dort in aß und b$, was passiert ist. 

Beim. Eingeben des Programmes drücken Sie an- 
statt der vielen SPACEs bitte in Zeile 
— 1990 1mal; — 2070 1mal; 

— 2150 2mal; — 2170 3mal 

die CTRL-Taste und die ‚J‘-Taste gleichzeitig. 
Daß es nicht richtig wurde, lag nicht an mir, son- 
dern am Drucker von meinem Freund (ich habe 
noch keinen!). 

Mit den in aß und b$ gespeicherten Informatio- 
nen landet der Interpreter dann im Bereich von 
1710-1790, wo 
— ab und b$ ausgegeben werden; 

— überprüft wird, ob eine neue Highscore vorliegt; 

— abgefragt wird, ob ein neues Spiel gestartet wer- 
den soll. 

Die ev. Speicherung der absoluten Bestleistung 

und das Spielende beginnen ab Zeile 2350 im 

Listing. 

Anmerkung: -— Das Programm läuft auch gut 
mit einem Grünmonitor; 

— Für Besitzer des CPC 664/6128 fällt in Zeile 
890 eine der zwei Klammern hinter dem DEC- 
Befehl weg. 


Variablenliste: 


highnoten tägliche Bestleistung 
highnotenl ewige Bestleistung 


names High-Score-Listen-Eintrag 

a$,b$ Hilfsstring; am Ende auch „Bot- 
schaftsstring“ 

dat$ Dateiname 

wahl Hilfsstring bei INPUT- oder INKEY$- 
Entscheidungen 
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10 ON BREAK GOSUR 2600 
20 50T0O 150 
30 REM EEEREREFKEERKERKERKEHREFREKEE 


"40 REM & * 
50 FEM # SENSO (EC) by Jens Kahle x 
60 FEM * in March 1386 # 
70 REM #& + 
80 FEM # Copy for # 
30 FEM # SCHNEIDER (COMPUTER) AKTIV # 
100 REM # * 


110 FEMEKKEREKKEKERKREREKKEKEREEGG 
120? 

130 * Initialisierung und Spielregeln 
140° 

150 MODE 1:CALL %BCO2:CALL %EB4E: INK 0,0 
:BORDER O: INK 1,21 

160 highnoten=10:highnateni=10:name$s="L[P 
Io 122 20 

170 LOCATE 1,10:FRINT"Haben Sie Senso sc 

han einmal gespielt ?" 

180 a$=UPFER$CINKEY$)SIF a$="" THEN 180 
130 IF INSTF(L,"JN",a$)=0 THEN FRINT CHR 
$(7);,:G60T0 180 

200 IF a$="J" THEN 250 

210 dat$="HI5SHSCOR. DAT" 

220 OPENOUT""+dat$ 

250 PRINT#3,highnoteni 

240 LCLOSEOUT 

250 LOCATE 3,16:CALL %BBOS: INFUT"Moechte 
n Sie die Anleitung sehen ";wahl$:wahl$= 
UPFER$ (wahl $) 

260 IF wahl$="N" THEN FRINT" 

"»SFATES$ (40) 

:50TO 450 

270 CLS 

280 LOCATE 17,2:FEN 3:FRINT"Senso" 

230 LOCATE 11,3:FEN 1:PRINT"(C) by Jens 
Kahle" 

300 PEN 2:PRINT STRINS$(40,154)::PEN 1 
310 WINDOW 1,40,5,25:L0CATE 1,1 

320 PRINT"Falls Sie SENSO Aöch nicht ken 
nen soll- ten, hier eine kurze Anleitung 
330 PEINT"Der Computer wird Ihnen gleich 
eine zu- faellig erstellte Melodie vo 
rspielen. Gleichzeitig leuchtet bei j 
edem Ton einer der vier Kreise auf, j 
e nachdem welcher Ton gespielt wird." 

340 PRINT"Sie muessen nun versuchen, di 
e Melodie nachzuspielen, indem Sie den 
Ton des jeweiligen Kreises spielen. Da 
s tun Sie indem Sie folgende Taste fuer 
den fol- genden Kreis druecken: ":PRINT 
350 FRINT"Kreis links oben ı Taste 7" 

360 PRINT"Kreis rechts oben : Taste 3" 
370 FRINT"Kreis links unten : Taste 1" 

380 FRINT"Kreis rechts unten : Taste 3" 

330 FEN 3:L0OCATE 3,13: FRINT"Bitte Taste 

druecken !":PEN 1 

400 CALL %EB18 

410 CLS 

420 PRINT"Natuerlich wird erst eine kurz 
e Melodie gespielt, die dann aber laen 


ger wird, wenn Sie die Melodie richt 

ig nach- spielen. Wenn Sie jedoch mehr 
als zwei Sekunden bensetigen, ist das 5 
piel auch beendet. 

430 FREINT"Falls Sie am Ende eines Spiele 
s die Ta- gesbestleistung ueberschritte 
n haben, duerfen Sie noch Ihren Namen v 
erewigen." 

440 WINDOW 1,40,1,25 

450 LOCATE 7,16:PEN 3:FRINT"Welche Spiel 
staerke (1-4)":LOCATE 10,17:PEN 2: PRINT" 
1=leicht 4=schwer" 

460 a$=INKEY$: IF a$="" THEN 460 

470 level=INSTR(1,"1234",a$): IF level=0 
THEN PRINT CHR$(7)5:50T0 460 

480 FEN 1:LOCATE 20, 23:PRINT"Viel Spass 
ryın 

430 GOSUB 1660 

500 MODE 0: BORDER 13 

510 INK 0,13: INK 1,1:INK 2,3: INK 3,3: INK 
4,12: INK 5,0: INK 6,6,24: INK 7,11,4: INK 
8,10,Z0: INK 9,5: INK 10,15: INK 11,16 

520 SPEED INK 25,25 

530 DIM anzahl (level#8):ENV 1,10,2,20:n0 
ten=0 

540 REM KRERRRERERERKRERERERRERRRRGRKKEK 


550 REM * Screen aufbauen * 
560 REM KKEKKKKKEERRERKRRRKRRRKEICKERKECK 
570 DES 


580 FOR radius=183 TO 193 STEP 2 

390 mx=430:my=200 

600 n=INT(PI#SQOR<Cradius) +1) :sn=5IN(360/n 
)2c25=L05 (360/n) 

610 y=0:MOVE mx+tradius,my 

620 FOR i%=1 TO n 

630 t=cstradius-snty: y=sn#tradiustestytra 

dius=t 

640 DRAW mx+tradius,myty,S 

650 NEXT 

660 NEXT 

670 FOR i=1 TO 4 

680 ON i GOTO 690, 700,710, 720 

630 j=500:k=300:50T0 730 

7090 3=375:k=300:60T0 730 

710 j=500:k=100:50T0 730 

720 j=375:k=100 

30 ORISIN j,k 

740 FOR y%=0 TO 42 STEP 4 

750 x=S0R (3600-y%ky%) 

760 DRAW -x,-y%,i:DRAW -x,y% 

770 DRAW x,-y%A:DRAW x,y% 

780 DRAW -y%,-x:DRAW -y%,x 

730 DRAW y%,-x:DRAW y%,x 

800 NEXT 

810 NEXT 

820 FEN 6:LOCATE 12,13: FRINT"Sensoa":LOCA 

TE 11,14: PRINT"Scheibe" 

830 WINDOW 1,7,1,25:FAFER S:CL5 

840 PEN 7:LOCATE 2, 1:FRINT"SENSO":LOCATE 
2,25: PRINT"SENSO" 

850 LOCATE 2, 1:FRINT"SENSO" 

860 WINDOW 1,7,3,1Z2:WINDOW#1,1,7,13,23 

870 FAFER#1, 5; CLS#1 


880 FEN#1,13:LOCATE#1,1,1:PRINT#1, "High" 
8390 PEN#1,10:FRINT#1," ";DEC$CChighnote 
n, 44") 

900 FPEN#1,11:PRINT#1:PRINT#1, "Name" 

310 PEN#1,14:PRINT#1,LEFT$(name$,6) 

920 REM KERKRERRRKRERRRRRRRRR 
9330 REM X& Spielbeginn = 
9340 REM KKXXKKEKERKERKEKKEEKEREKEEEERH 
350 ? 
960 REM KEEEERRRERRREKERKERKKRKRKRRREXOT X 
970 REM & Zunaechst der CFC + 
980 REM BRRRRRERRRERRRRERRKKRKKELKRKKIKEKK 
390 CLS:PEN 8: FRINT"Der CFÜ ist dran" 
1000 GOSUB 1660 

1010 FRINT:FRINT:PEN Z:PRINT"Noten: 
NT" "notent+ti 

1020 FOR k=1 TO naten 

1030 notesanzahl (k) 

1040 ON nnate GOSUB 1370,1430, 1490, 1550 
1050 NEXT 

1060 noten=naten+1 

1070 note=INT(RND(I)K4) +1 

1080 anzahl (noten)=nnte 

1090 ON note GOSUB 1370, 1430, 1490, 1550 
1100 REM EREKKEEKEKKKKEKIEKKKEKKKERKKICKEHE 
D REM # Spieler !"! # 
1120 REM KREEKERKKKEKKERKKIKOICKKRKKKEKKKECKIH 
1130 CLS:FEN 15: PRINT" Jetzt bist DU dra 


PRI 


1140 GOSUB 1660 

1150 FOR k=1 TO noten 

D altzeit=TIME 

1170 nate=Ö 

IF INKEY(10)=0 THEN nate=1 

» IF INKEYC35=0 THEN nate=2 

IF INEEY(13)=0 THEN note=3 

IF INKEY(S?=0 THEN note=d4 

IF note=Ö THEN 1180 

1230 neuzeit=TIME:zeitdi ff=neuzeit-altze 


1240 ON nate GOSURB 1370, 1430, 1490, 1550 
IF zeitdiff>400 THEN CALL &BBOS:50T 
DO 1990:’ Schlafmuezte 

1260 IF natei>anzahl(k) THEN CALL %BBOS: 
GOTO 2070:' Aufpassen 

1270 IF noten=level#8B AND k=naten THEN CL 
ALL %BROS:SOTD 2120: gewonnen 

1280 NEXT 

1290 GOTO 930 

1300 ? 

1310 ? 

1320 7 

1350 REM KXEXEFKEREREEKEEKEEEEESCREETE N 
1340 REM * Aufblinken und Ton einer X 
1350 REM # | Sensoflaeche # 
1360 REM KKEKEKKEKEKEKEKEEKEKEKEEKEEECH 
1370 INK 2,6 

1380 SOUND 1,426,50,7 

1330 GOSUB 1630 

1400 INK 2,3:505UB 1640 

1410 RETURN 

1420 ? 
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1430 INK 1,2 

1440 SOUND 1,379,50,7 

1450 GOSUB 1630 

1460 INK 1,1:5605UB 1640 

1470 RETURN 

1480: 2 een 
1490 INK 4,24 

1500 SOUND 1,358,50,7 

1510 GOSUB 1630 

1520 INK 4,12:50SUB 1640 

1530 RETURN 

1540 ? 
1550 INK 3,18 

1560 SOUND 1,319,50,7 

1570 GOSUB 1630 

1580 INK 3,9:G0SUB 1640 

1590 RETURN 

1600 REM KEEREERRRKKEERKEKKEEKEEKREKKEX 
1610 REM & Subröoutinen # 
1620 REM KRERREREKKKERRKEREKEKEKEKEICHEH 
1650 FOR i=1 TO 4OO:NEXT:RETURN: ’ Wartes 
chleife 

1640 FOR i=1 TO 5O:NEXT:RETURN:’ Wartesc 
hleife 

1650 SOUND 1,250,100,5,1 

1660 FOR i=1 TO 1000: NEXT:RETURN 

1670 REM 

1680 REM 

1690 REM 

1700 REM 

1710 MODE 1:CALL %BCO2:CALL %BE4E: BORDER 
0: FEN 1: PAPER OÖ 

1720 FRINT a$:FRINT b$ 

1730 G0TO 2020 

1740 INFUT"Also, moechten Sie noch einma 
l spielen ";a$:a$=UFFER$(a$) 

1750 IF a$="N" THEN 2340 

1760 IF a${>"J" THEN 1740 

1770 MODE 1:CALL %BCOZ:CALL %BR4E: INK 1, 

Z1:INK 0,0:BORDER OÖ:PEN 1 

1780 ERFASE anzahl 

1790 5OTO 450 

1800 REM KREEKBEEKEKKKEKKKKRRKRKKKEBEKEHT 
1810 REM # Highscore eingeben x 
1820 REM KERREBRREKERKRKKKKEREKXEKEKEKEHE 
1830 PRINT:FRINT"Aber trotzdem: 

1840 FRINT"Herzlichen Glueckwunsch, den 

n Sie ha- ben die Tagesbestleistung ueb 
erboten." 

1850 CALL %BBOO 

1860 LINE INPUT"Bitte geben Sie Ihren Na 

men ein (max. & Buchstaben) :";n 

ane$ 

1870 highnnaten=noten 

1880 GOTO 1740 


18390 
1300 
19310 FEM KEEEKEEREEESKEEKEEKEEECESEESKEECEE 
13920 REM # Verloren # 


1930 REM KERRRERRERRKERERRKEKKKKXREEEKEH 
1940 ? 


1350 REM KHHEHKKEEKKEKEKERKKREREIGTTER 


1360 FEM # "geschlafen" # 
1370 REM KEEREEKEKRKKEKEKEKKRREEKHKXKREE 
1380 

1330 a$=SPALE$(ISI+CHR$ (ZI) +" Hallo I!" 
CHR$ (24) +" 

"+CHR$ELSI +" Aufwachen! Du zu lange 


gewartet" 

2000 b$="Es tut mir ja leid, das Spie 
l abbre- <hen zu muessen aber Du hast 
zu lange gewartet." 

2010 5GDOSUB 1700 

2020 IF noten{highnaten THEN GOTO 1740 
2030 50TO 1830 


2040 REM KRERERKKRRKRKKRKKERKKKKEEKECKKEK 
2050 REM # Verkehrte Taste gedrueckt * 
2060 FEM KERRERRERKRRRERRRRRRERKRRRRRKREK 
2070 a$=" 


"+SPACE$ (CH) +CHR$ (24)+"Sie haben verloren 
IHN N+CHR$C24) 

2080 b$="Es tut mir ja leid, das Spiel 

abbrechenzu muessen, aber Sie haben le 

ider eineverkehrte Taste gedrueckt." 

2090 50SUB 1710:'’ Meldung: Verlaren 

2100 IF notenihighnoten THEN G0TO 1740 

2110 50TO 1830:’ Wenn ja dann nochmal un 

d Highscore eintragen 

2120 REM RREKRRKKKERKKKKRRCKKRKKRSIKCKIKKICK 

2130 REM *Level oder (Computer besiegt* 

2140 REM KKRKRERRERKKKRRKERIRSKGCKKRRIECRIEKICKIECH 
2150 a$s=" 


"+SPACE$ (CB) +CHR$(24)+"Herzlichen Glueckw 
unsch"+CHR$ C24) 

Z160 b$="Sie haben den aktuellen Level b 
esiegt!!" 

2170 IF noaten=32 THEN b$="Sie haben den 
Somputer besiegt !!!"+" 


2180 50SUB 1700 

2190 IF noten=32 THEN 50SUB 1650 

2200 IF noten=32 THEN 50SUB 1860 

2210 FRINT:FRINT: INFUT"Moechten Sie das 
Spiel (a)bbrechen oder versuchen, den 
naechsten Level zu (k)knacken (A/K)" 
‚wahl $ 

2220 wahl $=UFPER$ (wahl $) 

2250 IF wahl$="A" THEN 2280 

2240 ERASE anzahl:level=level+i 

2250 CLS:LOCATE 6,13: FREINT"Alles klar! 
Startklar Tr?" 

2260 FOR i=1 TOD Z000:NEXT:50TO 500 

2270 ’ 

2280 PRINT:FEINT:IF notenthighnaten THEN 
50TO 1740 

22390 50TO 1830 

2300 7 
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2310 REM KREERRKEKKKKKKKEKEKHKEKEEREFF 
2320 REM * Beste Highscore nach ueber-# 
2330 REM # troffen ? * 
2340 REM KKKKKEKKKEKEKKIHEKEECKECKKKEH 
2350 CLOSEIN 

2360 dat$="HI5HSCOR.DAT" 

2370 OFENIN""+dat$ 

2380 INFUT#3,highnoteni 

2330 CLOSEIN 

2400 highnotenZ=ennoten 

2410 IF highnoten2?=highnateni THEN 2530 
2420 FRINT:FRINT"Sie haben Ihre eigen 
de Bestleistung uebertraffen !!!" 

2430 FRINT"Deshalb wird das Ergebnis abg 
espeichert" 

2440 FRINT:IF FEEK(360)%>0 THEN PRINT"Sp 
ulen Sie Ihren Datenrecorder daher so we 
it zurueck, ‚dass die alte Datei ueber sc 
hrieben wird !":PRINT"Dann druscken Sie 
eine "; 

2450 PRINT"[Taste]" 

2460 CALL %BB18 

2470 highnateni=highnaten 
2480 OFENOUT""+dat$ 

2430 FRINT#3,highnaoteni 
2500 CLOSEOUT 

2510 FRINT:FRINT"Alles klar. 
uess, bis bald" 

2520 FOR i=1 TO 2500: NEXT 
2530 CALL %BCOZ:CALL %BB4E:MODE 1:FRINT" 
##%* PROGRAM ENDED K#£#":PRINT:FRINT" Basi 
c 1.0":FRINT 


"ıFRINT"Tsch 


2540 NEW 

2550 STOP 

2560 The END 

2570 REM KKKKEKKKKKEKEKEKKKKKEIKCKKRICKKKSCK 
2580 REM * +Break* # 


2530 REM EHKKKKKKKIKKHKKEKKECKEICKKIECKKEHX 

2600 CALL %BCO2:CALL %BE4E:MODE 1:LOCATE 
10, 13:PRINT"SENSO abgebrachen !!!" 

2610 FOR i=1 TO 2500:NEXT 

2620 anzahl (OÖ)=Ö0:ERASE anzahl 

2630 GOTO 450 


level Spielstärke 

anzahl Zahl der Noten, die gespielt werden 

radius Radius beim Umrandungskeis 

noten gespielte Noten 

mx,my X- bzw. Y-Koordinate beim Um- 
randungskreis 

J»k X- bzw. Y-Koordinate bei den vier 
kleinen Kreisen 

note Neue, hinzukommende Note 


altzeit, neu- 
zeit, zeitdiff Variablen zur Berechnung der 2-Se- 
kuden-Warteregel 


Jens Kahle 


LISTING 


RELATIVES 
DOS FÜR DD1 


Haben Sie einen CPC464 mit DDI-1 Floppy, einen 
CPC664 oder CPC6128, dann haben Sie sicher 
schon gemerkt, daß dieses Floppylaufwerk bzw. 
vielmehr das Betriebssystem AMSDOS für dieses 
Laufwerk keine relative Dateiverarbeitung unter 
Basic zuläßt. 

Für alle, die nicht wissen, was mit relativer Da- 
teiverarbeitung gemeint ist: Eine relative Datei ist 
mit einer ASCI Datei (OPENIN/OUT) vergleich- 
bar, jedoch hat man die Möglichkeit jedes beliebi- 
gen Schreib/Lese Zugriffs auf die Datei, d.h., Sie 
können dem Compzter sagen, er soll von einer 
5000 Zeichen großen Datei die Zeichen 3200— 
3210 durch andere ersetzen. Relative Dateien sind 
z.B. bei jeder besseren Datenverwaltung vonnöten. 

Mit RELDOS haben Sie neben der „normalen“ 
Datenverwaltung aber noch weitere Möglichkei- 
ten, so z.B. können Sie auf .BIN, .BAS oder .COM 
Dateien zugreifen. Mit dieser Möglichkeit läßt sich 
dann z.B. in wenigen Basiczeilen ein Einzel-File 
Kopierprogramm schreiben. Man könnte weiter 
einen Filemonitor schreiben, der es ermöglicht, 
eine beliebige Datei in HEX aufzulisten und zu 
verändern. RELDOS wurde unter anderem im Pro- 
gramm TELE-COM eingesetzt, um auf beliebige 
Dateien zuzugreifen und diese übers Telefon über- 
tragen zu können. 

Weiter könnte man z.B. mit RELDOS eine belie- 
bige ASCI-Datei nicht wie normal vom 1. bis zum 
letzten Buchstaben einlesen, sondern z.B. rück- 
wärts, also mit dem letzten Buchstaben angefangen. 

Bemerkenswert ist, daß man eine relative Datei 
öffnen und gleichzeitig weiter mit OPENIN und 
OPENOUT mit dem Diskettenlaufwerk arbeiten 
kann. RELDOS erlaubt die Verarbeitungen von bis 
zu 160 KB großen Dateien. 


DIE RELDOS BEFEHLE: 


RELDOS erweitert das Schneider BASIC 1.0 / 
1.1 um 9 RSC-Befehle: OPENREL, CLOSEREL, 
READ, WRITE, PUT, GET, RECLEN, STRADR 
und HILFE. 


OPENREL, Cstring 
Bsp: 
10 a$=“TEST.REL“ 
20 OPENREL,Ca$ 
Mit OPENREL können Sie eine Datei für den 
relativen Schreib/Lesezugriff öffnen. 
CLOSEREL 
Bsp: 
10 CLOSEREL 
Der Befehl CLOSEREL dient zum Schließen einer 
REL-Datei. Änderungen eines Records werden ge- 
speichert. 
READ,x 
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Bsp: 

10 READ,1 

READ dient zum Lesen eines beliebigen Records in 

den Speicher. 

WRITE,x 

Bsp. 

10 WRITE,1 

WRITE schreibt einen im Speicher befindlichen 

Record auf die Diskette zurück. Wichtig ist, daß die 

Recordnummer mit der von READ übereinstimmt, 

da sonst der Record nicht an seine ursprüngliche 

Stelle auf der Diskette gespeichert wird. Sie 

können z.B. den Record 1 auf den Record 2 ko- 

pieren, indem Sie die Befehle READ,1 und anschlie- 

ßend WRITE,2 ausführen. 

PUT,x,s,Cstring/variable 

PUT schreibt eine Variable oder String an eine be- 

stimmte Position in einem Record. Die Recordpo- 

sition x muß zwischen 0 und der Recordgröße 

liegen. s ist dabei die Anzahl der Bytes, die in die 

Recordposition x kopiert werden sollen. 

Bsp: 

10 aß=“Dies ist ein Text.“ 

20 a%=0:REM Variable anlegen 

30 STRADR,Ca$,Ca%:REM Adresse des Strings 
in a% 

40 PUT,5,LEN(a$),a% 

GET,s,x,Cstring/variable 

GET ist das Gegenstück zu PUT. GET dient zum 

Lesen Ihrer Daten aus einem Record. In diesem 

Beispiel haben wir im Gegensatz zum obrigen 

keine String, sondern mal einen Wert verwendet, 

und zwar einen Fließkommawert. 

Bsp: 

10 a=0 

20 GET,0,5,Ca 

WICHTIG: Fließkommawerte sind 5 Bytes lang, 

deshalb die 5. Aber was auch wichtig zu wissen ist: 

Wenn Sie z.B. den Befehl a=40 ausführen, so ist a 

keineswegs eine Integervariable, sondern wird auch 

als Fließkommavariable im Speicher abgelegt. 

STRADR,Ca$,Ca% 

Variablen lassen sich durch Voranstellen von C bei 

den Befehlen PUT und GET leicht verarbeiten. Bei 

String muß allerdings hierfür der Befehl STRADR 

einspringen. Er bestimmt die Adresse eines String 

im RAM. Die Adresse des Strings a$ wird in die Va- 

riable a% übergeben. WICHTIG: Der Variablen a% 

muß vor ihrer ersten Benutzung z.B. mit a%=0 ein 

Wert zugewiesen werden. 

Bsp: 

10 a$=“Mailbox“+CHR$(0) 

20 a%=0 

30 STRLEN,Ca$,Ca% 

40 PUT,0,LEN(a$),a% 

Wie Sie sehen, muß nach STRLEN kein C mehr 

vor a% beim Befehl PUT gesetzt werden. Würden 

Sie dies trotzdem tun, so würde nicht der Text in 

a$, dessen RAM-Adresse in a% steht, in den Record 

kopiert werden, sondern der Inhalt der Variable 

a%, und das ist natürlich hier falsch. 


LISTING 


Die Zeile 10 ist auch nicht ganz klar? Nun, 
würde man das CHR$(0) weglassen, so wäre der 
String a$ 7 Bytes lang, und es würden nur 7 Bytes 
in den Record kopiert. Um beim späteren Lesen 
wieder zu wissen, wie lang denn der String war, 
hängt man an den String z.B. CHR$(0), so daß 
Bytes im Record gespeichert werden. Dies sollten 
Sie immer bei Strings machen. 


ALLGEMEINES 


Record Größe 


Mit dem Befehl RECLEN,x können Sie die Record- 
größe ändern/festlegen. Die Recordgröße darf nur 
folgende Werte haben: 1,2,4,8,16,32,64,128,256, 
512 und 1024 Bytes. Gibt man als Recordgröße 
l an, so werden nur einzelne Bytes gelesen/ge- 
schrieben. 


Zur Schreib/Lese Routine 


RELDOS liest/schreibt immer 1024 Bytes von/auf 
die Diskette. Somit ist die maximale Recordgröße 
auch 1024 Bytes. Verarbeiten Sie aber z.B. nur 128 
Bytes große Records, so liest RELDOS immer 
gleich 8 Records in den Speicher. Der Effekt ist, 
daß RELDOS mehr Records im Speicher verarbei- 
ten kann und diese nicht ständig von Diskette le- 
sen muß. Die Verarbeitungsgeschwindigkeit nimmt 
dadurch stark zu. 

Beim Öffnen einer Datei mit OPENREL werden 
alle Infos über diese Datei eingelesen, z.B. wo sich 
diese Datei auf der Diskette befindet. Dadurch 
muß RELDOS bei Schreib/Lese-Funktionen nicht 
mehr aufs Directory (Inhaltsverzeichnis) der Dis- 
kette zugreifen. Dies macht RELDOS noch schnel- 
ler. 


Automatisches Update (sichern) der Änderungen 


Öffnen Sie z.B. eine REL-Datei und ändern ein 
Byte eines Records, so können Sie mit WRITE die- 
sen geänderten Record wieder auf Diskette spei- 
chern. Dies müssen Sie aber nicht, da RELDOS 
automatisch Änderungen speichert, d.h. wenn Sie 
nach einer Änderung mit READ weiter arbeiten 
oder CLOSEREL aufrufen, so schreibt RELDOS 
die Änderungen auf Diskette zurück (aber nur, 
wenn wirklich mit PUT auf diesen Record zurück- 
gegriffen wurde). 


Integer und Fließkomma mit PUT und GET 


In den obigen Beispielen wurden immer nur Strings 
mit PUT oder GET verarbeitet, da diese wohl am 
häufigsten verwendet werden. Was aber z.B. mit 
Integer- (a%546) oder Fließkomma- (A=.45.65465) 
zu tun? Nun als ersten brauchen Sie bei diesen Va- 
riablentypen nicht den STRADR Befehl verwen- 
den. Sie müssen lediglich vor die Variablennum- 
mern wieder das C Zeichen stellen und anstatt der 
Stringlänge die unten aufgeführten Werte verwen- 
den. WICHTIG: Sie müssen immer das C Zeichen 
der Variablen bei PUT und GET voranstellen, da 
die RELDOS Befehle an dieser Stelle nur Zeiger 
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auf Variablen verarbeiten, d.h. nur die Speicher- 
adresse der Variablen im RAM übergeben bekommt. 
Deshalb muß auch bei Strings die Länge gesondert 
übergeben werden. Integer- und Fließkomma-Va- 
riablen brauchen unterschiedlich viel Speicher. 
Bei Integer-Variablen muß der Wert 2 für 2 Bytes 
und bei Fließkomma 5 übergeben werden. 

Bsp. 

10 a%=546:PUT ,‚0,2,Ca% 

20 b=-0.3532873: PUT,0,5,Cb 


Adreßbestimmung bei Strings: 


Die Basicfunktion C liefert bei Strings keinen Poin- 
terwert, sondern die Adresse eine 3 Bytes langen 
Pointers, dessen 1. Byte die Länge des Strings und 
2-3. Byte die RAM-Adresse des Strings angibt. Der 
Befehl STRADR ‚Cstr,Cadr holt die Adresse/Pointer 
des Strings str und schreibt diesen Wert in die Va- 
riable adr. adr. enthält also die Speicheradresse des 
Strings str, welche bei PUT und GET übergeben 
werden muß. WICHTIG: Nun muß kein C mehr vor 
die Variable adr gestellt werden, d.h. also: 

Bsp: 

10 a$=“RELDOS, einfach iire.““ 

20 a%=0 

30 STRADR,Ca$,Ca% 

40 PUT,0,LEN(a$),a% 

Wie Sie sehen, es wird kein C in Zeile 40 benötigt. 
Was Sie aber auch sehen werden, ist Zeile 20. Sie 
werden sich vielleicht fragen, was die da macht? In 
Zeile 30 wird der Pointer (Zeiger) auf die Variable 
a% übergeben, und wenn diese Variable nicht exi- 
stiert, dann gibt’s Ärger (probiern Sie es mal aus). 


- Das heißt also, diese Variablen müssen vor ihrem er- 


sten Gebrauch erst mal mit einem Wert versehen 
werden. 


DIE BEISPIEL PROGRAMME 


Wir haben noch 2 Beispielprogramme abgedruckt, 
eine einfache Dateiverwaltung und einen FILE- 
MONITOR, mit dem Sie .COM, .BIN etc. Dateien 
„unter die Lupe nehmen können. D.h. Sie können 
sich Files in HEX und ASCII auflisten lassen. Dies 
Programm zeigt insbesondere, welche Möglichkei- 
ten mit RELDOS gegeben sind. 


Fehlermeldungen: 


Natürlich gibt RELDOS auch Fehlermeldungen aus, 
z.B. wenn Sie eine Datei öffnen wollten, die gar 
nicht existiert. Die Fehlermeldung erscheint auf 
dem Bildschirm. Um nun vom Programm her 
solche Fehler abfragen zu können, gibt es das FEH- 
LERFLAG mit der Adresse &3C (hex). D.h. also, 
wir können mit PRINT PEEK (&3C) den Wert des 
Fehlerflags auslesen. Diese Werte haben folgende 
Bedeutung: 


Wert Bedeutung 
0 Kein Fehler alles ok 


- 1 der bei READ oder WRITE angegebene Re- 


cord existiert nicht, es wurde z.B. versucht, 
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IImaEr+227727277727277272777227777 777777 
11 ’x x 
12 ’% RELDOS R1.4 x 
13 ’x * 
14 ’%* Thomas Gigge x 
15 ’x x 
16 ’%* fuer Schneider aktiv x 
17 ’x x 
18 ’* fuer CPC 464/664/6128 & DDI-1 * 
19 ’x x 

20 ’* 100 x 

21 ’* x 

22 VERKKKKKKKKKKKKKKKKKK KK KK KK IKK KK KK KK 
40 ad=&9A00 :sz=19:1n=100:1nstp=10 :MEMORY 
ad-1 

45 ON ERROR GOTO 65 

50 su=0:READ a$:cs=VAL("&"+a$):FOR i=ad 
TO ad+sz:READ a$:a=VAL("&"+a$):POKE i,a: 
su=suta:NEXT:IF cs<>su THEN PRINT'"DATA E 

RROR in"+STR$ (In) :END 

55 adsad+sz+1:1n=1n+1nstp:GOTO 50 

60 CALL HIMEM+1 

65 IF ERR=4 THEN RESUME 60 

70 ON ERROR GOTO 0 

100 DATA 9C9,21,B0,9C,CD,5E,9B,01,0F,9A, 
21,5D,9A,C3,D1,BC,2C,9A,C3,61,9A 

110 DATA C83,C3,3E,9C,C3,67,9B,C3,DA,9B, 

C3,F3,9B,C3,FD,9B,C3,17,9C,C3,04 

120 DATA 7D3,9F,C3,12,9F,4F,50,45,4E,52, 
45,C0C,43,4C,4F,53,45,52,45,0C0,52 

130 DATA 867,45,43,4C,45,CE,52,45,41,CA, 
57,52,49,54,C5,47,45,D4,50,55,D4 

140 DATA 5EF,53,54,52,41,44,D2,48,49,4C, 
46,C5,00,00,2C,9A,00,00,3A,18,9F 

150 DATA 6E4,B7,C2,10,9B,32,AC,9C,1A,47, 
13,1A,6F,13,1A,67,11,00,60,CD,77 

160 DATA 795,BC,38,08,3E,02,32,3C,00,C3, 
7A,BC,CD, 7A,BC,21,0A,A7,AF,32,3C 

170 DATA 7A3,00,3E,02,32,AE,9C,3E,41,32, 

AF,9C,3A,AE,9C,57,3A,AF,9C,AF,3C 

180 DATA AB9,32,AF,9C,E5,C5,CD,1A,9B,C1, 

El1,11,B8,9F,0E,10,E5,C5,D5,1A,4F 

190 DATA 6BF,3A,01,A7,B9,20,2D,06,0B,13, 
1A,4F,7E,B9,20,24,23,10,F6,D1,D5 

200 DATA 4F3,21,0C,00,19,7E,23,23,23,23, 
11,18,9F,B7,28,0B,E5,EB,11,10,00 

210 DATA 8AC,47,19,10,FD,EB,E1,01,10,00, 

ED,BO,D1,C1,21,20,00,19,EB,E1,0D 

220 DATA 95F,79,B7,20,BB,3A,AF,9C,E6,0F, 

FE,05,20,9A,AF,32,AF,9C,3A,18,9F 

230 DATA 637,B7,C0,3E,02,32,3C,00,21,97, 
9D,18,4E,3E,04,32,3C,00,21,E9,9D 

240 DATA ACC,18,44,3A,00,A7,5F,21,B8,9F, 

E5,D5,C5,DF,31,9B,C1,D1,E1,CD,4E 

250 DATA AA3,9B,DF,31,9B,C9,66,C6,07,3A, 
00,A7,5F,21,B8,9F,E5,D5,C5,DF,4B 

260 DATA A2F,9B,C1,D1,E1,CD,4E,9B,DF,AB, 
9B,C9,4E,C6,07,24,24,0C,79,E6,0F 
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270 DATA B7D,FE,0A,C0,79,E6,F0,3C,4F,14, 
C9,7E,B7,C8,CD,5A,BB,23,18,F7,ED 
280 DATA 81A,53,A6,9C,C9,43,4A,21,00,00, 
78,B7,28,07,ED,5B,A6,9C,19,10,FD 
290 DATA 845,79,0D,B7,20,F4,22,AA,9C,11, 
00,04,CD,61,9C,ED,53,A8,9C,11,18 
300 DATA 867,9F,19,7E,B7,28,25,F5,4F,3A, 
AD,9C,B9,28,15,3A,AC,9C,B7,28,0F 
310 DATA AAD,3A,AF,9C,4F,3A,AE,9C,57,CD, 
34,9B,AF,32,AC,9C,F1,32,AD,9C,CD 
320 DATA 6D6,C6,9B,C9,E1,3E,01,32,3C,00, 
21,CF,9D,18,98,6F,26,00,29,11,12 
330 DATA 845,00,19,11,09,00,CD,61,9C,7B, 
C6,41,4F,55,C9,CD,6C,9B,3A,AF,9C 
340 DATA A15,B9,20,05,3A,AE,9C,BA,C8,7A, 
32,AE,9C,79,32,AF,9C,C3,1A,9B,CD 
350 DATA AE7,6C,9B,AF,32,AC,9C,C3,34,9B, 
21,B8,9F,D5,ED,5B,A8,9C,19, DD, 56 
360 DATA A21,05,DD,5E,04,19,DD,4E,02,DD, 
46,03,D1,ED,BO,C9,21,B8,9F,D5,ED 
370 DATA 7FF,5B,A8,9C,19,DD,56,05,DD,5E, 
04,19,D1,E5,13,1A,6F,13,1A,67,D1 
380 DATA 9EO,DD,4E,02,DD,46,03,ED,BO,3E, 
FF,32,AC,9C,C9,3A,AC,9C,B7,28,0F 
390 DATA 882,3A,AE,9C,57,3A,AF,9C,4F,CD, 
34,9B,AF,32,AC,9C,21,18,9F, 36,00 
400 DATA 8D3,01,A0,00,54,5D,13,ED,BO,C9, 
7A,B3,C8,C5,EB,06,01,7C,B7,20,09 
410 DATA 60B,7A,BD,38,05,65,2E,00,06,09, 
7B,95,7A,9C,38,05,04,29,30,F6,3F 
420 DATA ADB,3F,78,44,4D,21,00,00,3D,20, 
03,18,17,29,F5,78,1F,47,79,1F,4F 
430 DATA 841,7B,91,7A,98,38,05,57,7B,91, 
5F,2C,F1,3D,20,E9,37,C1,C9,00,00 
440 DATA 28B,00,00,00,00,00,00,00,00,04, 
02,2A,20,52,45,4C,44,4F,53,20,52 
450 DATA 381,31,2E,34,20,34,36,34,2F,36, 
36,34,2F,36,31,32,38,20,2A,0D,0A 
460 DATA 621,0A,20,43,6F,70,79,72,69,67, 
68,74,20,A4,20,31,39,38,36,20,62 
470 DATA 6A1,79,20,54,68,2E,20,47,69,67, 
67,65,2C,20,4E,75,65,72,6E,62,65 
480 DATA 46F,72,67,0D,0A,07,20,4D,42,6F, 
78,3A,20,28,30,39,31,31,29,38,34 
490 DATA 4B1,34,30,30,20,28,53,59,53,4F, 
50,29,3B,20,54,78,3A,20,28,30,35 
500 DATA 481,31,29,32,32,35,39,34,20,4D, 
42,6F,78,3A,20,39,30,31,32,34,31 
510 DATA 58B,0D,0A,0A,20,42,65,66,65,68, 
6C,65,3A,20,7C,4F,50,45,4E,52,45 
520 DATA 57D,4C,2C,20,7C,43,4C,4F,53,45, 
52,45,4C,2C,20,7C,52,45,41,44,2C 
530 DATA 5BC,20,7C,57,52,49,54,45,2C,20, 
7C,50,55,54,2C,20,7C,47,45,54,2C 
540 DATA 524,20,7C,52,45,43,4C,45,4E,2C, 
20,7C,53,54,52,41,44,52,0D,0A,20 
550 DATA 32C,20,20,20,20,20,20,20,20,20, 
7C,48,49,4C,46,45,0D,0A,0A,00,07 
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560 DATA 5C7,46,69,6C,65,20,6E,6F,74,20, 
66,6F,75,6E,64,2E,0D,0A,00,07,4E 

570 DATA 6BA,6F,20,52,45,4C,2D,46,69,6C, 
65,20,6F,70,65,6E,65,64,20,77,69 

580 DATA 562,74,68,20,7C,4F,50,45,4E,52, 
45,4C,2E,0D,0A,00,07,52,65,63,6F 

590 DATA 6A4,72,64,20,64,6F,65,73,20,6E, 
6F,74,20,65,78,69,74,73,2E,0D,0A 

600 DATA 628,00,07,52,45,4C,2D,46,69,6C, 
65,20,61,6C,72,65,61,64,79,20,6F 

610 DATA 614,70,65,6E,2E,0D,0A,00,0D,0A, 
42,65,66,65,68,6C,73,6C,69,73,74 

620 DATA 57C,65,20,76,6F,6E,20,52,45,4C, 
44,4F,53,3A,0D,0A,0A,7C,4F,50,45 

630 DATA 73F,4E,52,45,4C,2C,40,73,74,72, 
69,6E,67,2F,66,69,6C,65,6E,61,6D 

640 DATA 52C,65,0D,0A,7C,43,4C,4F,53,45, 
52,45,4C,0D,0A,7C,52,45,41,44,2C 

650 DATA 731,72,65,63,6F,72,64,6E,75,6D, 
6D,65,72,0D,0A,7C,57,52,49,54,45 

660 DATA 6F7,2C,72,65,63,6F,72,64,6E,75, 
6D,6D,65,72,0D,0A,7C,50,55,54,2C 

670 DATA 832,70,6F,73,69,74,69,6F,6E,2C, 
61,6E,7A,61,68,6C,5F,62,79,74,65 

680 DATA 748,73,2C,40,76,61,72,69,61,62, 
6C,65,2F,61,64,72,65,73,73,65,0D 

690 DATA 745,0A,7C,47,45,54,2C,70,6F,73, 
69,74,69,6F,6E,2C,61,6E,7A,61,68 

700 DATA 7B6,6C,5F,62,79,74,65,73,2C,40, 
76,61,72,69,61,62,6C,65,2F,7A,69 

710 DATA 6A2,65,6C,61,64,72,65,73,73,65, 
0D,0A,7C,52,45,43,4C,45,4E,2C,72 

720 DATA 716,65,63,6F,72,64,67,72,6F,65, 
73,73,65,0D,0A,7C,53,54,52,41,44 

730 DATA 72C,52,2C,40,73,74,72,69,6E,67, 
2C,40,76,61,72,69,61,62,6C,65,25 

740 DATA 51A,0D,0A,0A,00,DD,66,03,DD,6E, 
02,23,7E,12,23,13,7E,12,C9,21,03 

750 DATA 25A,9E,C3,5E,9B,00 


den Record 3000 zu lesen, obwohl die Datei 
nur für max. 500 Records gedacht ist. 

Dieser Wert wird also beim Erreichen oder 
Überschreiten des Dateiendes übergeben. 

2 Es wurde versucht, eine Datei mit OPENREL 
zu öffnen, die nicht existiert, Datei erst mit 
OPENOUT anlegen.. 

3 Es wurde READ oder WRITE verwendet, ob- 
wohl gar keine Datei mit OPENREL geöffnet 
1st. 

4 Sie wollten eine weitere Datei mit OPENREL 
öffnen, obwohl immer noch eine geöffnet ist, 
Schließen Sie die alte mit CLOSEREL. 

(Th. Gigge) 
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10 III PO OIIORIIOORRRIIIOKKKK IKK 
11 ’x x 
12 ’* Beispiel zu RELDOS R1.4 x 
13 ’* DATEIVERWALTUNG x 
14 ’* Thomas Gigge * 
15 ’x x 
16 ’* fuer Schneider aktiv x 
17 ’x* x 
18 ’* fuer CPC 464/664/6128 * 
19 ’x * 

x 

x 

x 


22 ’KRKKKKEKKKKKKKKKKKKKKKIKKKK KK KK KK 
25 MODE 2:INPUT "DATEI NAME :",FL$ 
30 INPUT "ANZAHL DER MAX. DATENSAETZE :" 


100 CLS:PRINT"DEMO DATEIVERWALTUNG ZU. RE 
LDOS" 

110 PRINT:PRINT"1 - DATENSATZ LESEN/AEND 
ERN/HINZUFUEGEN" 

120 PRINT"2 - NEUE DATEI ANLEGEN 

190 PRINT:PRINT"3 - DATEI SCHLIESSEN/PRG 
. ENDE 

200 PRINT: PRINT: INPUT"IHRE WAHL ? ",A 
210 ON A GOSUB 1000, 2000, 3000 
220 GOTO 100 

1000 !OPENREL,@FL$ 

1002 CLS: INPUT"DATENSATZ NR. 
UE) :",NR 

1005 IF NR<O THEN }CLOSEREL: RETURN 

1010 LOCATE 1,4:PRINT CHR$ (24) ; "NAME 
"PRINT: PRINT"STRASSE: ' ':PRINT: nr "PLZ& 

ORT: "+CHR$ (24) 

1015 LOCATE 1,20:PRINT"ALTEN DATENSATZIN 
HALT MIT COPY-TASTE KOPIEREN. 

1020 !READ,NR:AX=0 

1030 FOR I=0 TO 2:A$(I)=STRING$ (40 ,CHR$ ( 
0)): !STRADR,@A$ (I) ‚@AX: !GET,I*40,40,A%:N 

EXT: ’DATEN AUS RECORD IN VAR. SCHREIBEN 
1040 FOR I=0 TO 2:LOCATE 10,4+I%*2:PRINT 

A$(I);:NEXT 

1050 FOR I=0 TO 2:LOCATE 10,4+1%*2: INPUT 
"" A$(I):A$(I)=A$(I)+CHR$ (0) :NEXT: ’ENDMA 

RKE &00 ANFUEGEN 

1052 LOCATE 1,17:INPUT "* SPEICHERN (J/N 
) 2 ",A$ 

1055 IF UPPER$(A$)="J"THEN FOR I=0 TO 2: 
!STRADR,@A$ (I) ‚@A%: !PUT,I*40,LEN(A$(I)), 

AX: NEXT 

1060 GOTO 1002 

2000 PRINT:PRINT"DATEI ’"+FL$+"’ WIRD AN 

GELEGT." :PRINT:OPENOUT FL$ 

2005 PRINT"DATEI WIRD MIT PRINT#9 AUF MA 

X. GROESSE ANGELEGT." 

2007 FOR I=0 TO ANZ:PRINT#9,STRING$ (128, 
" ") 5 :NEXT:CLOSEOUT 


(-1 = H-MEN 


LISTING 


2010 PRINT: PRINT"DATENSATZ/RECORD WIRD M 
IT &00 GEFUELLT." : }CLOSEREL: |;OPENREL,@FL 
$ 

2020 A$=STRING$(128,CHR$(0)) 

2030 FOR I=0 TO ANZ: PRINT"RECORD:" ;I;CHR 
$(13);:!READ,I: !PUT,0,128,@A$:NEXT: ’WRIT 
‘ E,I WIRD AUTOMATISCH ERLEDIGT 

2040 PRINT: PRINT: PRINT"DATEI ’"+FL$+"’ W 
IRD GESCHLOSSEN." : | CLOSEREL : RETURN 

3000 !CLOSEREL : PRINT : PRINT"DATEIVERWALTU 
NG BEENDET, ARBEITSDATEI ’"+FL$+"’ GESCH 
LOSSEN." 

3010 END 


10 III 
11 ’x 

12 ’%* Beispiel zu RELDOS R1.4 
13 ’% FILEMONITOR 

14 ’* Thomas Gigge 

15 ’x 

16 ’* fuer Schneider aktiv 

17 ’x e 

18 ’* fuer CPC 464/664/6128 
19 ’x 

20 ’* 102 

21 ’x 

22? RERRRKKKKKKKKKKKKKKKKKKIK IKK KK IKK IK IX 
40 MODE 2:PRINT"* FILEMONITOR *" :PRINT:I 
NPUT "DATEI NAME :",FL$ 

50 PRINT STRING$(80,"-"); 

60 WINDOW#3,1,80,5,25 

70 PUF%=O 


*RHMKHOHOHKNOH 


100 }OPENREL,@FL$ 

110 CLS#3: !READ,REC:FOR L=0 TO 15:PRINT# 

3,SPC(3) ;HEX$ (REC*256+L*16,4)+": ";:D$=" 

":FOR I=0 TO 15: !GET,16*L+I,1,@PUF%:PRIN 

T#3 ,HEX$ (PUF%,2)+" ";:IF PUF%<32 THEN PU 

F%=46 

120 D$=D$+CHR$ (PUF%) :NEXT:PRINT#3, " 

D$+"<'" :NEXT 

130 PRINT#3:PRINT#3:PRINT#3,"(+) RECORD, 
(-) RECORD ?" 

140 A$=INKEY$:IF A$=""THEN 140 

150 IF A$="+"THEN REC=REC+1 

160 IF A$="-"THEN REC=REC-1 

170 GOTO 110 


>"+ 


SCHNEIDER AKTIV 
für aktives 


Computern mit 
SCHNEIDER CPC 
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TURBO-SKRIPT 


Ihnen gefällt die optische Gestaltung Ihres Pro- 
gramms nicht? TURBO-SCRIPT schafft hier Ab- 
hilfe und gibt Ihrem Programm den letzten Schliff. 
TURBO-SCRIPT ist ein neuer Bildschirmaus- 

gabetreiber für die CPC-Serie. Er ermöglicht: 
a) doppelt schnelle Bildschirmausgabe in Mode 2 
b)Darstellung von 5 verschiedenen Schrifttypen 

sowie automatisches Unterstreichen sowie Hin- 

terlegen einer Schrift im Graphikmode sowie be- 

liebige Vergrößerung derselben 

TURBO-SCRIPT bindet 9 Befehle in RSC-Form 
ins CPC Basic ein. Nach dem Start des Programms 
ist Turbo-Script aktiv. Turbo-Script arbeitet in 
Mode 0, 1 und 2. Zu bemerken ist, daß der Befehl 
CHAR in Mode O oder 1 schneller als in Mode 2 
arbeitet. Das Basic wird um die folgenden Befehle 
erweitert: 

KURSIV, BIG, SMALL, GRID, UNDERLINE, 
INVERS, MUSTER, SETMUSTER und CHAR. 


Die Befehle im einzelnen 


KURSIV x schaltet Kursivschriftmodus ein/aus 

BIG,x schaltet fette Darstellung ein/aus 

SMALL,x schaltet dünne Darstellung ein/aus 

GRID,x schaltet gerasterte Darstellung ein/ 
aus 

INVERS,x schaltet inverse Darstellung ein/aus 
(nur für Mode 2) 

MUSTER,x schaltet Hintergrundmuster ein/aus 


Bei diesen Befehlen ist für x ein Wert O0 oder 1 
möglich. O schaltet den Schrifttyp aus, und 1 ein. 
Man kann den Wert x auch weglassen, z.B. nur 
KURSIV. In diesem Fall wird der entsprechende 
Modus immer aktiviert. _ 


Unterstreichen 


UNDERLINE,mode 
Für Mode kann ein Wert von 0—2 eingesetzt 


. werden. 0 schaltet den Unterstreichungsmodus aus, 


l und 2 schaltet ihn ein. In Mode 1 wird mit der 
Bitoperation OR, in Mode 2 mit XOR unterstri- 
chen. Der Vorteil von Mode 2 ist, daß Unterlängen 
wie bei „g‘‘, „y‘“ oder „‚p‘ weiterhin gut erkennbar 
bleiben. 

Um das Unterstreichungsmuster zu ändern, müs- 
sen Sie mit dem Befehl POKE in die Speicherstelle 
&BFO2 das entsprechende Bitmuster schreiben. 
Bsp: POKE &BOF2, &x01010101 Funktion für 
gepunktete Unterstreichung. 

Turbo-Script Schriften in beliebiger Größe 
CHAR, Cstring, x-pos, y-pos, x-größe, y-größe 

Mit CHAR ist es möglich, die Schriften von 
Turbo-Script in beliebiger Größe darzustellen sowie 
diese im Graphikmodus zu nutzen. x-pos und y- 
pos geben die Graphikzielkoordinaten des ersten 
Zeichens des Textstrings string an. Das Zeichen C 
vor dem Stringnamen ist nur beim CPC464 nötig, 


LISTING chneider 


10 ?XKKKKKKKKKKKKKKKKKKKKIIIIIK IKK II 
11 ’x x 
12 ’* TURBO SCRIPT x 
13 ’x x 
14 ’* Thomas Gigge x 
15 ’x x 
16 ’* fuer Schneider aktiv x 
17 ’x x 
18 ’* fuer CPC 464/664/6128 x 
x 
x 
x 
x 


22 ’ZRRKKKKKKKKKKKKKKKKKK KK IKK KK KK KK X 
45 : 

60 ad=&A200 :sz=19:1n=100:1nstp=10 :MEMORY 
ad-1 

65 ON ERROR GOTO 85 

70 su=0:READ a$:cs=VAL("&"+a$):FOR i=ad 
TO ad+sz:READ a$:a=VAL("&"+a$):POKE i,a: 
su=suta:NEXT:IF cs<>su THEN PRINT"DATA E 

RROR in"+STR$(1n) :END 

75 ad=zad+sz+1:1n=1n+1nstp:GOTO 70 

80 CALL HIMEM+1:POKE &BF02,255 ’UNDERLIN 
E STYLE 

85 IF ERR=4 THEN RESUME 80 

90 ON ERROR GOTO 0 

100 DATA 7E8,CD,D7,A2,21,00,BF,36,00,E5, 
D1,13,01,0A,00,ED,BO,3E,02,CD,OE 

110 DATA B23,BC,DD,21,89,A2,CD,D6,A3,DD, 
21,A5,A2,CD, D6 ,A3,21,09,01,CD,75 

120 DATA C29,BB,01,32,A2,21,85,A2,C3,D1, 
BC,4AF,A2,C3,D6,A3,C3,D3,A4,C3,D7 

130 DATA E64,A4,C3,CD,A4,C3,DB,A4,C3,E7, 
A4,C3,E3,A4,C3,C3,A3,C3,DF,A4,43 

140 DATA 7E3,48,41,D2,4B,55,52,53,49,D6, 
42,49,C7,47,52,49,C4,55,4E,44,45 

150 DATA 79D,52,4C,49,4E,C5,49,4E,56,45, 
52,D3,4D,55,53,54,45,D2,53,45,54 

160 DATA 552,4D,55,53,54,45,D2,53,4D,41, 
4C,CC,00,00,4F,A2,00,00,03,00,05 

170 DATA 6D1,00,8F,01,10,00,93,A2,0F,96, 
A2,53,63,68,6E,65,69,64,65,72,20 

180 DATA 5A0,61,6B,74,69,76,02,00,02,00, 
54,01,14,00,AF,A2,25,B2,A2,2A,20 

190 DATA 539,54,55,52,42,4F,20,53,43,52, 
49,50,54,20,2A,20,20,A4,20,31,39 

200 DATA 73A,38,36,20,62,79,20,54,68,2E, 
20,47,69,67,67,65,2A,D4,BD,11,F8 

210 DATA 891,A2,7A,BC,C8,11,04,00,19,22, 
05,A3,21,F8,A2,22,D4,BD,2A,A6,BB 

220 DATA BA6,7C,E6,7F,67,22,FA,A2,C9,E5, 
CD,D3,12,CD,1D,A3,3A,C8,B1,FE,02 

230 DATA 81F,C2,4E,13,EB,E1,CD a. OB,3A, 
07,BF,4F,06,08,1A,A9,13,77,7C,CE 

240 DATA 85C,08,67,10,F6,C9,3A,00,BF,B7, 
C2,84,A3,01,08,00,11,04,A5,D5,ED 

250 DATA A06,BO,E1,3A,03,BF,B7,28,20,E5, 
7E,CB,OF,E6,7F,77,23,7E,CB,OF,E6 
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260 DATA 9DC,7F,77,23,23,23,23,7E,CB,07, 
E6,FE,77,23,7E,CB,07,E6,FE,77,El 
270 DATA 57D,3A,01,BF,B7,28,14,47,3A,02, 
BF,4F,11,0B,A5,3E,02,B8,28,04,1A 
280 DATA 921,B1,18,02,1A,A9,12,3A,04,BF, 
B7,CA,9C,A3,3A,05,BF,B7,C4,AE,A3 
290 DATA 887,3A,06,BF,B7,C4,B2,A3,C9,06, 
04,11,04,A5,D5,7E,E6,AA,12,13,23 
300 DATA 8D6, 7E,E6,55,12,13,23,10,F2,El, 
C3,2E,A3,3E,B1,32,A7,A3,E5,06,08 
310 DATA 970,7E,4F,1F,B1,77,23,10,F8,El, 
C9,3E,A1,18,EC,E5,11,FC,A4,06,08 
320 DATA 79F,7E,4F,1A,B1,77,23,13,10,F7, 
E1,C9,1A,FE,08,C0,13,1A,13,6F,1A 
330 DATA 99D,67,01,08,00,11,FC,A4,ED,BO, 
C9,DD,66,01,DD,6E,00,22,F4,A4,CD 
340 DATA 978,B8,A4,DD,66,03,DD,6E,02,22, 
F2,A4,DD,66,05,DD,6E,04,DD, 56,07 
350 DATA BAF,DD,5E,06,ED,53,EE,A4,ED,53, 
F7,A4,22,F0,A4,22,F9,A4,DD,66,09 
360 DATA AC3,DD,6E,08,7E,32,F6,A4,23,5E, 
23,56,D5,FD,E1,2A,F7,A4,22,EE,A4 
370 DATA 8D1,FD,46,00,FD,23,2A,F9,A4,22, 
FO,A4,F3,CD,06,B9,21,00,38,11,08 
380 DATA 97D,00,19,10,FD,CD,1D,A3,11,04, 
A5,D5,DD,E1,CD,09,B9,FB,O0E,08,DD 
390 DATA 9ED,7E,00,DD,23,C5,ED,4B,F4,AA, 
2A,F7,A4,22,EE,A4,C5,06,08,0E,80 
400 DATA AFC,F5,A1,28,03,CD,8F,A4,2A,EE, 
A4,ED,5B,F2,A4,19,22,EE,A4,CB,09 
410 DATA 960,F1,10,E9,2A,F0,A4,2B,2B,22, 
FO,A4,C1,0D,20,D2,C1,0D,20,C4,3A 
420 DATA C3E,F6,A4,3D,32,F6,A4,2A,EE,A4, 
22,F7,A4,20,8E,C9,C5,D5,E5,3A,F2 
430 DATA CF5,A4,4F,06,00,ED,5B,EE,A4,2A, 
F0,A4,C5,D5,E5,CD,EA,BB,E1,D1,C1 
440 DATA C37,3A,FB,A4,13,0B,3D,20,FB,78, 
B7,28,EB,E1,D1,C1,C9,F3,D9,C5,D9 
450 DATA 8C8,FB,C1,79,E6,03,21,EB,A4,5F, 
16,00,19,7E,32,FB,A4,C9,2E,00,26 
460 DATA 716,BF,73,C9,2E,03,18,F8,2E,04, 
18,F4,2E,01,18,F0,2E,05,18,EC,2E 
470 DATA 23E,06,18,E8,2E,07,18,E4,04,02, 
01,00,00,00,00,00,00,00,00,00,00 


10 ?REKEKKKKKKIKKKKIKKKKIKII IKK 
11 ’* 

12 ’* Beispiel zu TURBO SCRIPT 
13 ’x* 

14 ’* Thomas Gigge 

15 ’x* 

16 ’%* fuer Schneider aktiv 

17 ’x 

18 ’%* fuer CPC 464/664/6128 

19 ’x* 

20 ’* 099 

21 ’x 

22 ’EREKKKKKKKKKKKKKKKKKK KK KK IKK 


“RU MMMHOHHOHOCH 


40 a$="normal" :GOSUB 110 
50 !KURSIV:a$="kursiv":GOSUB 110: !KURSIV 


‚Oo . % 

60 !BIG:a$="fett" :GOSUB 110: !BIG,O 

70 !SMALL:a$="schwach" :GOSUB 110: ! f 
0 


80. !GRID:a$="raster" :GOSUB 110: !GRID,O0 
90 LOCATE 1,20: !UNDERLINE, 1:PRINT"Unters 
treichen. ..2..........": }UNDERLINE,O 

100 END 

110 a=399-yx60 


140 PLOT -5,-5,3: CHAR,@a$,184,a,2,2 
150 PLOT -5,-5,2: CHAR, @a$,304,a,3,2 
160 PLOT -5,-5,1: CHAR, @a$,460,a,4,3 
170 y=y+1:RETURN 

180 RETURN 


nicht bei den anderen Rechner. x- und y-größe 
gibt den Vergörßerungsfaktor der Schrift. Diese 
Werte sollten zwischen 1 und 30 liegen. Vermeiden 
Sie den Wert 0. 

Bsp: 

10 ab=,,irres, ding!“ - 

20 CHAR ,Ca$,0,390,6,4 


Hintergrund Muster 


SETMUSTER ‚Cstring 

Mit diesem Befehl.können Sie das Hintergrund- 
muster, welches mit MUSTER ein- und ausgeschal- 
tet werden kann, definieren. Der angegebene 
String. sollte 8 Zeichen lang sein und das 8 mal 8 
Bitmuster enthalten. 
Bsp: 
10 FOR =0 TO 7 
20 aß=a$+CHR$(2'i) 


30 NEXT 

40 SETMUSTER,CaS 

50 MUSTER Thomas Gigge 
TURBO-BACKUP 


Das Programm TURBO-BACKUP dient zum Kopie- 
ren von ganzen Disketten. Nun werden Sie sagen, 
was das soll. Ein solches Programm wird beim Kauf 
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LISTING 


10 7 KERKRKEKKKIKIIEIIKKKIKU EIKE IE IX 
11 ’% 


x 

x 

x 
14 ’* Thomas Gigge x 
15 ’x x 
16 ’%* fuer Schneider aktiv x 
17 ’x x 
18 ’* fuer CPC 6128 * 
19 ’x x 

20 ’* 097 x 

21 ’x* x 

22 VKRRKKKKKKKKKKKKKKKKKKKK IKK KK KK IKK KK 
45 : 

60 ad=&9000:32=19:1n=100: 1Instp=10 :MEMORY 
ad-1 

65 ON ERROR GOTO 85° 

70 su=0:READ a$:cs=VAL("&"+a$):FOR i=ad 
TO ad+sz:READ a$:a=VAL("&"+a$):POKE i,a: 
su=suta:NEXT:IF cs<>su THEN PRINT"DATA E 

RROR in"+STR$(1n) :END 

75 ad=ad+sz+1:1n=1n+1nstp:GOTO 70 

80 CALL HIMEM+1 

85 IF ERR=4 THEN RESUME 80 

90 ON ERROR GOTO 0 

100 DATA B1E,CD,13,92,CD,EE,90,11,00,00, 

D5,DF,4F,90,CD,6C,92,D1,CD,C4,90 

110 DATA 9A1,CD,08,91,16,00,CD,B6,90,CD, 
EE,90,16,14,CD,C4,90,CD,08,91,16 

120 DATA 9A8,14,CD,B6,90,26,01,2E,08,CD, 
75,BB,21,F4,91,CD,1A,91,CD,81,BB 

130 DATA A24,CD,06,BB,E6,DF,FE,59,28,BB, 
C7,66,C6,07,4E,C6,07,52,C6,07,63 

140 DATA 8BC,C7,07,22,98,90,32,97,90,1E, 
00,3E,14,32,EC,92,AF,32,EB,92,CD 

150 DATA A8C,D9,90,3A,9F,A8,AF,3A,A0,A8, 
47,E5,7A,C6,09,67,3A,ED,92,6F,CD 

160 DATA 8E7,75,BB,3E,2E,CD,5A,BB,26,01, 
2E,0A,CD,75,BB,E1,ED,57,B7,28,09 

170 DATA DOA,D5,C5,E5,CD,5C,92,E1,C1,D1, 

D5,C5,DF,46,90,24,24,7C,FE,80,CC 

180 DATA B29,D4,90,C1,0C,D1,10,EE,14,E5, 
21,EC,92,35,7E,E1,B7,20,BA,AF,C3 

190 DATA 956,E6,90,3E,19,32,ED,92,21,9A, 
92,3E,CD,ED,47,18,8E,21,46,90,AF 

200 DATA 929,ED,47,3E,18,32,ED,92,3E,DF, 
C3,52,90,21,EB,92,34,7E,B7,20,05 

210 DATA 471,21,00,10,18,03,21,00,40,18, 
00,B7,28,02,C6,03,C3,5B,BD,26,01 

220 DATA 7D5,2E,08,CD,75,BB,21,23,91,CD, 
1A,91,CD,06,BB,06,3C,3E,20,CD,5A 

230 DATA 84A,BB,10,F9,C9,26,01,2E,08,CD, 
75,BB,21,57,91,CD,1A,91,21,30,91 

240 DATA 93E,18,DE,7E,B7,C8,CD,5A,BB,23, 
18,F7,49,6E,73,65,72,74,20,53,4F 

250 DATA 684,55,52,43,45,20,64,69,73,63, 
20,69,6E,20,64,72,69,76,65,20,41 

260 DATA 6EE,3A,20,61,6E,79,20,70,72,65, 


LISTING 


73,73,20,61,6E,79,20,6B,65,79,2E 

270 DATA 50E,07,0D,00,49,6E,73,65,72,74, 
20,54,41,52,47,45,54,00,2A,20,54 

280 DATA 496,55,52,42,4F,20,2D,20,42,41, 
43,4B,55,50,20,36,31,32,38,20,2A 

290 DATA 472,20,20,20,20,20,28,43,29,20, 
31,39,38,36,20,62,79,20,54,68,6F 

300 DATA 47B,6D,61,73,20,47,69,67,67,65, 
0D,0A,20,20,20,20,20,20,20,20,20 

310 DATA 6CC,20,20,41,75,74,6F,72,20,6F,' 
66,20,74,68,65,20,6C,65,67,65,6E 

320 DATA 6F5,64,61,72,79,20,70,72,6F,67, 
72,61,6D,73,20,54,45,4C,45,2D,43 

330 DATA 597,4F,4D,20,61,6E,64,20,44,49, 
53,43,2D,4D,45,43,48,41,4E,49,43 

340 DATA 43A,0D,0A,00,53,4F,55,52,43,45, 
3A,0D,0A,54,41,52,47,45,54,3A,00 

350 DATA 719,41,6E,20,6F,74,68,65,72,20, 
64,69,73,63,20,74,6F,20,63,6F,70 

360 DATA 7E9,79,20,28,79,2F,6E,29,20,3F, 
20,00,CD,FF,BB,CD,4E,BB,3E,02,CD 

370 DATA 7FO,OE,BC,01,00,00,C5,CD,38,BC, 
C1,AF,CD,32,BC,3E,01,06,1A,48,CD 

380 DATA 8AF,32,BC,CD,52,92,2E,02,26,0F, 
CD,75,BB,21,65,91,CD,1A,91,CD,52 

390 DATA 7E7,92,2E,18,26,01,CD,75,BB,21, 
E3,91,C3,1A,91,06,50,3E,2D,CD,5A 

400 DATA C00,BB,10,F9,C9,D5,CD,8C,92,3A, 
C9,92,4F,21,C7,92,D1,DF,4C,90,C9 

410 DATA 8B1,3A,51,BE,E6,F0,B7,28,05,21, 
BA,92,18,03,21,BE,92,11,C9,92,4F 

420 DATA 653, 7E,B7,C8,23,B1,12,13,13,13, 
13,18,F4,21,C7,92,06,09,7A,11,04 

430 DATA 7D5,00,77,19,10,FC,C9,E5,C5,01, 
02,00,7E,FE,E5,20,0A,23,10,F8,0D 

440 DATA 877,20,F5,C1,E1,AF,C9,C1,E1,DF, 
49,90,C9,01,03,05,07,09,02,04,06 

450 DATA 030,08,00,01,03,05,07,02,04,06, 
08,00,00,00,00,02,00,00,00,02,00 

460 DATA 00A,00,00,02,00,00,00,02,00,00, 
00,02,00,00,00,02,00,00,00,02,00 

470 DATA 004,00,00,02,00,00,00,02,00,00, 
00,00,00,00,00,00,00,00,00,00,00 

des CPC’s doch schon mitgeliefert? Das ist richtig, 
aber erstens nutzt dieses Programm die 128KB des 
CPC6128 voll aus, so daß die Disketten nur 4 x ge- 
wechselt werden müssen und zwieitens werden nur 
die Sektoren einer Diskette kopiert, die auch wirk- 
lich Informationen enthalten! Dadurch läßt sich 
viel Zeit sparen. Kopiert werden auch gelöschte 
Files der Diskette, so daß Sie, wenn Sie die Original 
Diskette mit der kopierten Diskette Byte für Byte 
vergleichen, keinen Unterschied feststellen werden. 
TIP zum Programm: 

Sie sollten vor jedem Testlauf das Programm ab- 
speichern, da TURBO BACKUP die Speicherver- 
waltung.des 6128 ändert und somit Ihr gerade ab- 


etipptes Programm gelöscht werden könnte. 
ö (Th. Gigge) 
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LISTING 


SKAT- 
HELFER 


Das Programm übernimmt bei einer gemütlichen 
Skatrunde die doch etwas lästige Arbeit des Auf- 
schreibens und Ausrechnens der Punktestände der 
einzelnen Spieler und zeigt diese gleichzeitig mit 
der Spielsumme tabellenartig an. Als Hilfe werden 
auch noch der Geber und jeweilige Spieler ange- 
zeigt. 

Zunächst erfolgt die Eingabe der 3 Spieler. Da- 
nach wird vom Programm noch die Uhrzeit ange- 
fordert. Sind diese Eingaben erledigt, brauchen 
nur noch der jeweilige Spieler (1/2/3) und die ent- 
sprechende Spielsumme eingetippt werden. Der 
Rest wird vom Programm automatisch erledigt. 

Sollte einmal aus Versehen eine falsche Eingabe 
(falsche Spielsumme) gemacht worden sein, so 
dient die Funktionstaste (F)9 der Korrektur. Hier 
brauchen dann lediglich der Spieler und die KOR- 
REKTE Spielsumme angegeben werden. 


Anmerkung zum Programm: 


Da die Eingabe von Spieler und Spielsumme über 
Input den zeitlich richtigen Ablauf der Uhr stören 
würde, sind alle Eingaben über Inkeyroutinen rea- 
lisiert. Bei der Eingabe des Spielers braucht daher 
nur die jeweilige Nummer des Spielers ohne EN- 
TER eingegeben werden. Da die Spielsumme je- 
doch unterschiedlich viele Ziffern haben kann, ist 
hier als Trennungsmerkmal zum Abschluß der Ein- 
gabe der großen Entertaste zu drücken. 


Verwendete Variablen in Zeile 
geber 20,480,930 940,960,1140 
name 130,190,200 
runde 140 
zeile 150,310,320,330,540,840-900,960,1120, 
- 1130 

std 230, ab 1190 
minu 240,dto. 
sec 250,dto. 
punkte(x) 310-330,820,880-900 
name$ (x) 200,390-410,480,920,940 
spieler 600-650,820,880-920 
spiel 790,860,880-900 
korrspiel 1060,1080 
(Jörg Braun) 


1 OD ° #6 ale aba an ae aa aan A Aa a ah A ae ae ae 


20 ’* ” 
30 ’* SKATTABELLE * 
yo ’* C(c)1985 by * 
50,2% J.Braun * 
60 ’* * 


70 2. nd EZ 02 ZU ZU 2 ZU 2 2 2 2 2 2 2 2 2 0202 

100 MODE 1:PRINT”Korrektur durch (F)Tast 
e 93 

110 FOR p=1 TO 1500:NEXT 

120 geber*-1 

130 name=1 
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140 runde=1 

150 zeile*-1 

160 ’ 
;170 WHILE name<=3 

180 ELS:LOCATE 1,5 

190 PRINT”Der Name des”name”.Spiele 
rs bitte” 

200 INPUT name$(name):name=name+1 
210 WEND 

e20 CLS 

230 LOCATE 1,5: INPUT "Aktuelle Uhrzeit S 
tunden ”;std 

240 LOCATE 1,6: INPUT "Aktuelle Uhrzeit M 
inuten "”;minu 

250 LOCATE 1,7:INPUT "Aktuelle Uhrzeit S 
ekunden ”;sec 

260 

270 EVERY 50,3 GOSUB 1210 : REM Uhrzeit 
280 ON BREAK GOSUB 1170 : REM Enter r 
edefinieren 

290 MODE 1:INK 3,16: BORDER 7 

300 °’ 

310 LOCATE 1,10+zeile:PRINT USING”####”; 
punkte(1) 

320 LOCATE 11,10+zeile:PRINT USING”####” 
;punkte(2) 

330 LOCATE 21,10+zeile:PRINT USING”####” 
;punkte(3) 


340 ° * 


350 WINDOW#1,1,40,1,3:PAPER#1,3:CLS#1 
360 LOCATE 13,2:PRINT” SKATPROGRAMM ” 
370 MOVE 0,250:DRAWR 640,0,1 

380 ’ 

390 LOCATE 1,9:PRINT name$(1) 

400 LOCATE 11,9:PRINT name$(2) 

410 LOCATE 22,9:PRINT mame$(3) 

420 LOCATE 35,9: PRINT”SPIEL” 

430 ’ 

440 MOVE 130,270:DRAWR O,-300 

450 MOVE 300,270:DRAWR O,-300 

4560 MOVE 470,270:DRAWR O,-300 

480 LOCATE 1,5:PRINT”Geber :”name$(geber 
) Fr 

490 KEY DEF 18,1,32 :REM Grosse Entert 
aste als Space definieren 

500 ’ RR .: 
510” 

520 WINDOW#2,1,40,4,25 

530 LOCATE 20,5:PRINT SPACESC21) 

540 IF Czeile/4)=(zeile\4) 


THEN MOVE 0,250-16*zeile:DRAWR 640, 
O:zeile=zeiletl 
S50 LOCATE 24,5:PRINT”Spieler ”?” 
SEO ’ 


570 WHILE s$="": REM Eingabe des Spiele 
rs 

580 s$=INKEYS 

590 WEND 


600 spieler-VAL(s$):s$="" 

610 IF spieler=1 THEN’ sp=1 

620 IF spieler=-2 THEN sp=11 

630 IF spieler-3 THEN sp=22 

640 ° \ 

650 IF spieler=-9 THEN GOTD 1020 


ELSE IF spieler <>9 AND spieler>3 


THEN PRINT CHR$S(C7):50TD S5S0: 
REM Test auf Korrektur/Spieler 


670 LOCATE 24,5::PRINT SPACE$SC20) 

680 LOCATE 24,5:PRINT”Spiel ? ® 

630 

700 WHILE RIGHT$Cspi2$,1)<>” ”:REM Einga 
be der Spielsumme 

710 spi$-=INKEYS$ 

720 spie$=-spi2$+spi$ 


730 DI 


740 LOCATE 31,5 
750 PRINT spi2$ 
760 EI 

770 WEND 

780 °’ 


790 spiel=VAL(spi2$) 

800 spi$="":spi2$=""” 

B10 ’ " 

820 punkte(spieler)=punkte(spieler)+spie 
1 


830 IF zeile<>1- THEN LOCATE 3,10+zeile: 
PRINT”--” ELSE 860 

840 LOCATE 13,:110+zeile:PRINT”--” 

850 LOCATE 23,10+zeile:PRINT”--” 

860 LOCATE 35,10+zeile:PRINT USING”####” 
‚spiel 

870 ’ 

880 IF spieler=-1 THEN LOCATE 1,10+zeile: 
PRINT USING”####”; punkte(spieler) 

890 IF spieler-2 THEN LOCATE 11,10+zeile 
:PRINT USING”####”; punkte(spieler): 

900 IF spieler=3 THEN LOCATE 21,10+zeile 
:PRINT USING”####"”; punkte(spieler) 

g10 ’ 

920 LOCATE sp,3:PRINT name$(spieler) 

930 IF geber<3 THEN geber*=geber+1 ELSE g 
eber=1 

940 LOCATE 1,5:PRINT”Geber :"SPACE$(C10): 
LOCATE 8,5: PRINT name$(geber) 

350 zeile-zeiletl 

960 IF zeile>=-16 THEN zeile-1:Geber-1 EL 
SE 530 :REM Umblaettern ?? 

970 FOR pause=-1 TO 2000:NEXT 

980 CLS#2:G0TO 2390 

990 GOTO 530 


1010 END 
1020 CLS#1:REM Korrektur einer Falschein 


1030 KEY DEF 18,1,13 

1040 LOCATE 1,2:PRINT”Falscheingabe ” 
1050 LOCATE 22,2: INPUT”Welcher Spieler”; 
spieler 

1060 LOCATE 17,2: INPUT”Korrekte Spielsum 

me”;korrspiel 

1070 KEY DEF 18,1,32 

1080 punkte(spieler)=punkte(spieler)-spi 

el+korrspiel 

1090 spiel-korrspisl 

1100 ’ 

1110 CLS#1:LOCATE 13,2:PRINT” Skatprogra 

mm ” . “ 

1120 IF zeile?>1 THEN zeile*=zeile-1l 

1130 IF zeile MOD 4-0 THEN zeile*-zeile-1 
1140 IF geber-1 THEN geber*3 ELSE geber*- 


i 


geber-1l 
1150 GOTO 830 
1160 ’ 


1170 KEY DEF 18,1,13:STOP:RETURN:REM Ent 
er rueckdefinieren bei Break 

1180 ’ 

1190 ’*** Uhr 

1200 ’ 

1210 sec=sectl 

1220 IF sec=60 THEN minu=minu+l:sec=O 
1230 IF minu=60 THEN std=std+1:minu=0O 
1240 IF std=24 THEN std=O 

1250 sec$=STR$(sec) j 

1260 IF LENCsec$)>2 THEN sec$-=-RIGHTS$Csec 
$,2) ELSE MID$(Csec$,1,1)=-"0” 

1270 minu$= STRSCminu) 

1280 IF LENCMINUS)J>2 THEN minus= RIGHTSCm 
inu$,2) ELSE MID$Cminu$,1,1)="0” 

1290 std$=STR$(std) 

1300 IF LEN(Cstd$)>2 THEN std$=RIGHTSCstd 
$,2) ELSE MID$(std$,1,1)="0” 

1310 zeit$=std$+”: ”+minus+”:”"+sec$ 

1320 LOCATE 31,2:PRINT zeit$ 

1330 RETURN 


MS-DOS: 

VON DISCKOMP 
BIS 

COPY 


Die Großzügigkeit von Amstrad/ 
Schneider, gleich zwei Betriebssy- 
steme zu liefern, stellt uns erst 
später vor die Wahl, welches wir für 
die tägliche Arbeit benutzen. In der 
Regel wird es das GEM-freundliche- 
re DOS Plus sein. Da DOS Plus aber 
auch erstaunlich MS-DOS kompa- 
tibel ist, können wir uns erlauben, 
die ersten Kursteile auf beide Sy- 
steme auszulegen. Wenn diese gene- 
relle Einführung abgearbeitet ist, 
werden die speziellen unterschiedli- 
chen Optionen beschrieben, die den 
Gebrauch beider DOS - Versionen 
sinnvoll machen. 

Und noch etwas anderes: DOS 
plagt den Eigner eines PC’s bei nur 
einem Laufwerk mit etlichen 
‚Diskettenwechseln nach Bildschirm- 
'anweisung. Ein Ausweg aus der 
Misere kann die Einrichtung einer 
ausreichend großen RAM-DISC 
sein, wie sie der Schneider PC 1512 
auf einfache Weise ermöglicht. 


DISKCOMP, VERIFY 


In der letzten Ausgabe wurde die 
Anfertigung einer Diskettenkopie 
besprochen und da wir hierzu die 
Systemdiskette benutzt haben, in- 
teressiert es uns besonders, ob das 
Duplikat auch einwandfrei ist. Hier- 
zu liefert DOS den externen Befehl 
DISKCOMP. Zur Erinnerung noch 
einmal: Extern bedeutet, daß die 
Systemdiskette im aktuellen Lauf- 
werk sein muß, damit die Routine 
vor der Ausführung eingelesen 
werden kann. Aktuell ist das Lauf- 
werk, welches durch den Kennungs- 
buchstaben im Prompt beschrieben 
wird. 

Grundlegend gilt dies Verfahren 
beim Kopieren/Vergleichen für 
beide DOS Systeme, allerdings 
nimmt unter DOS Plus ein menüge- 
steuertes Utility-Programm die mei- 
sten Überlegungen ab. 

Legen Sie die DOS- Originaldis- 
kette in Laufwerk A, die Kopie in 
B und geben Sie ein DISKCOPY 
A:B:. Sollten Sie nur ein Laufwerk 
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besitzen, lassen Sie die Laufwerks- 
bezeichnungen weg. Ist der Befehl 
mit ENTER ‚abgeschickt‘, wird 
die Routine eingelesen und gestar- 
tet. Der Aufforderung, die erste 
Diskette in A, die zweite in B einzu- 
legen, brauchen Sie in unserem spe- 
ziellen Beispiel nicht nachzukom- 
men. Die Systemdiskette stellt ja 
die Quelldiskette dar. Auf dem Mo- 
nitor können Sie jetzt ganz be- 
schaulich mitverfolgen, welcher 
Sektor in welcher Spur und auf wel- 
cher Seite gerade verglichen wird, 
für Besitzer mit nur einem Lauf- 
werk wird diese Ruhe allerdings 
des öfteren von der Aufforderung 
zum Plattenwechsel unterbrochen. 
Ist der Vergleich schließlich been- 
det, steht folgende Mitteilung auf 
dem Monitor: 

Verglichen wurden nn Spuren 

n Sektoren / Spur n Seiten 

Vergleich OK 

Weitere Disketten vergleichen 

Q/N)? en 
Man erkennt, daß es durch die Ein- 
gabe verschiedener Parameter mög- 
lich gewesen wäre, Disketten mit 
nur 8 Spuren und/oder nur einer 
Seite zu vergleichen. Unter Um- 
ständen kommen Sie einmal in sol- 
che Verlegenheit, deshalb hier die 
vollständige Syntax zur Befehlsein- 


abe: DISKCOMP LW: LW: (/1) 
[8). 
Der schönste Vergleich nutzt 


jedoch nichts ohne eine im Ernst- 
fall ausgegebene Fehlermeldung. 
Ein inkompatibles Format, eine 
Differenz zwischen Original und 
Kopie in Spuren oder Sektorenan- 
zahl, wird selten vorkommen, man 
weiß ja vorher, was man überprüft. 
Manchmal jedoch könnte ein Lese- 
fehler auftreten, bei dem Laufwerk, 
Spur und Diskettenseite genannt 
wird. Es hat in diesem Fall keinen 
Sinn, den DISKCOMP Befehl zu 
wiederholen, da bereits vier Lese- 
versuche durchgeführt wurden und 
es nicht anzunehmen ist, daß bei 
einem zweiten Start die nächsten 
vier Versuche zum Erfolg führen. 
Wahrscheinlich lag eine defekte Dis- 
kette vor und es bleibt nur die An- 
fertigung einer neuen Kopie (neue 
Diskette benutzen!). 

Die dritte Fehlermeldung bezieht 
sich auf den direkten Vergleich, 
d.h. sobald bei der spurweisen 
Kontrolle ein Unterschied auftritt, 
wird er mit Spur und Seite genant. 
Entstand das Duplikat durch DISK- 
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BANK.DAT 
HCP.DAT 
PCB.DAT 


A: \TXT\BRF\PRIVAT 


COPY, dann darf der Fehler ganz 
einfach nicht auftreten. Wenn Sie 
sich jedoch an die physikalische 
Streuung der Daten erinnern (vor- 
hergehender Kursteil) und Sie sich 
vor Augen halten, daß eine kom- 
plette Kopie auch durch das Her- 
überziehen der einzelnen Files ent- 
stehen kann, dann werden Sie ver- 
stehen, daß ein Unterschied beim 
Vergleich der Spuren auftreten 
kann, obwohl sämtliche Daten kor- 
rekt sind. Durch den COPY-Befehl 
wurde die Datei eben ‚ordentli- 
cher“ auf der Zieldiskette abgelegt, 
welche dadurch aber nicht mehr 
mit der „unordentlichen‘ Quelldis- 
kette übereinstimmt. Es besteht 
‚dann die Möglichkeit, die einzelnen 
Files zu verlgeichen. 

Schreib- oder Lesefehler werden 
selten auftreten, wenn die VERIFY 
Option von DOS eingesetzt wird. 
VERIFY gehört zu den internen 
Kommandos und liest nach dem 
Schreiben auf Diskette die Daten 
sofort noch einmal, um sie zu ver- 
gleichen. Gehandhabt wird der Be- 
fehl wie ein Schalter. VERIFY ON 
schaltet die Vergleichsoption ein, 
VERIFY OFF schaltet sie aus. Über 


A: \TXT\BRF\FIRMA 


root (Wurzeiverzeichnis) 


(TEST)( Kurs | 


A: \TXT\VLG\KURS 


\TXTIVLGSITEST 


KNIGHT 
CRAFTON 


MISSION 


Baumstruktur 


den augenblicklichen Zustand die- 
ses „Schalters‘‘ können Sie sich mit 
der Eingabe von VERIFY informie- 
ren. Das sofortige Einlesen nach 
dem Schreiben kostet natürlich et- 
was Zeit, sollte jedoch zur Sicher- 
heit stattfinden. Eine falsche Datei 
ist nun einmal unbrauchbar, auch 
wenn sie noch so schnell abgespei- 
chert wurde. 


FORMAT, SYS 


Nachdem das Duplikat der System- 
diskette überprüft wurde, sollte das 
Original einen sicheren Platz finden, 
man verwendet nur die Kopie als 
Arbeitsdiskette. 

Sie haben sicher schon erkannt, 
daß man zwischen einer reinen Da- 
tendiskette und einer systemforma- 
tierten Diskette unterscheiden muß, 
wobei letztere auf jeden Fall die 
versteckten Files (IO.SYS und MS- 
DOS.SYS) enthält. Vor- und Nach- 
teile sind klar. Einmal abgesehen 
vom rechtlichen Aspekt bei der 
Weitergabe von Disketten (Copy- 
right auch bei DOS), benötigt man 
nicht auf jeder Diskette die System- 
dateien, etwa bei reinen Datendis- 
ketten zu einem Textprogramm. 
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Das Betriebssystem muß aber vorher 
ins RAM geladen werden. Von ei- 
ner systemformatierten Diskette 
kann dagegen ein Programm ohne 
nochmaligen Diskettenwechsel ge- 
startet werden. Bedenken Sie aber, 
daß nur die internen Kommandos 
„im Kasten“ sind. Für die externen 
Befehle, die das Arbeiten überhaupt 
erst komfortabel machen, benöti- 
gen Sie auch bei einem systemfor- 
matierten Datenträger eine DOS- 
Diskette zusätzlich. 

Zurück zum Formatbefehl. Mit 
den ir FORMAT (LW:) 
(11) (18) TOXUV) (IS) haben Sie 

ie Qual der Wah l. 

Mit „LW:‘ wählen Sie das Lauf- 
werk an, in dem der zu formatie- 
rende Datenträger ist. Beim PC 
1512 mit einem Laufwerk kann 
darauf verzichtet werden, nach dem 
Start der Routine ist dann aller- 
dings der Diskettenwechsel fällig. 
Die Optionen “/1“ und “/8““ ha- 
ben Sie bereits anderweitig kennen- 
gelernt, “/0‘“ formatiert in einer 
alten DOS Version und wird wohl 
selten gebraucht. Interessanter ist 
“[V“, das das VOL-Kommando 
symbolisiert und auf der Diskette 
einen schon vorher eingegebenen 
Namen einträgt (siehe: LABEL, 
VOL). Am wichtigsten ist jedoch 
der Paramter “/S‘, der die System- 
dateien auf die neue Diskette über- 
trägt. Zwar sind alle Optionen zum 
Formatieren wahlweise anzugeben, 
doch gehört ‘“/S‘“ immer an das 
Ende der Liste. 

Zum nachträglichen Kopieren 
der Systemdateien auf eine bereits 
formatierte Diskette steht der inter- 
ne Befehl SYS (LW:) zur Verfü- 
gung. Bedingung ist dabei, daß der 
Datenträger völlig leer ist oder be- 
reits die Systemdateien in der glei- 
chen Größe enthält. Unter diesen 
Umständen ist es wohl besser, be- 
reits beim Formatieren an die Sy- 
stemdisketten zu denken. 


LABEL, VOL 


Der besseren Ordnung wegen kann 
jede Diskette mit einem eigenen 
Namen versehen werden, der im Di- 
rectory eingetragen wird. Hierzu 
dient das externe Kommando 
LABEL (LW:) NAME. Ein bereits 
vorhandener Name wird dabei ver- 
ändert. Mit dem Befehl VOL (LW:) 
erfahren Sie das Etikett der Disket- 
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te des angesprochenen Laufwerkes. 
Ist beim FORMAT Kommando der 
Parameter “/V““ gegeben so wird 
der vorher mit LABEL eingetrage- 
ne Name verwendet. Beispiel: A> 
LABEL B: MEIER. Hier erhält die 
Diskette in Laufwerk B den Namen 
Meier, natürlich unter der Voraus- 
setzung, daß sich die DOS Disket- 
te in Laufwerk A befindet. Ein zu- 
künftig ausgegebenes Directory 
wird dadurch immer auf den Dis- 
kettenbesitzer hinweisen. Den 
Namen wählen Sie am besten nach 
Ihren eigenen Ordnungskriterien. 
Bei Datendisketten empfiehlt sich 
ein Hinweis auf das entsprechen- 
de Anwendungsprogramm, wenn 
mehrere Anwender mit dem PC ar- 
beiten, empfiehlt sich vielleicht der 
Name des Diskettenbenutzers. 


RECOVER 


Das mindeste, was Sie für eine ge- 
rade eben erst formatierte Disket- 
te an Sicherheit tun können, ist 
die Überprüfung mit dem exter- 
nen Befehl RECOVER (LW:) (NA- 
NE). Hierdurch werden alle Sek- 
toren überprüft — bei Eingabe ei- 
nes Dateinamens nur die Sektoren 
der Datei — wobei fehlerhafte Stel- 
len markiert und zum Schreiben ge- 
sperrt werden. 


COPY EINFACH 
Natürlich gibt es weder eine einfa- 
che noch eine luxuriöse COPY-Op- 
tion. Allerdings bietet dieser inter- 
ne Befehl. viele Optionen, die erst 
nach Verständnis der Dateihierar- 
chie zu nutzen sind. Zum sofortigen 
Arbeiten, also ‚für alle Tage“, eig- 
net sichfolgende Syntsx: 

COPY A: NAME.DAT B: 
Hierbei wird die Datei „NAME. 
DAT“ von der Diskette in 
Laufwerk A auf die Diskette in 
Laufwerk B übertragen. Vorsicht: 
Die Laufwerksbezeichnung ist nicht 
wahlfrei, d.h. auch wer nur ein 
Laufwerk besitzt, muß als Kopier- 
ziel das Laufwerk B angeben. Es 
ist nämlich durchaus möglich, in- 
nerhalb einer Diskette zu kopieren, 
warum, erklärt sich aus dem hierar- 
chischen Dateisystem von DOS. 


HIERARCHISCHES DATEI- 
SYSTEM UND BAUMSTRUKTUR 


Wer hat nicht — oder wird dies 
noch tun — sofort nach dem Aus- 
packen des PC 1512 das GEM Desk- 


top-Programm gestartet. Die dabei 
zutage tretenden Möglichkeiten mit 
Ordnern, Unterordnern und so 
weiter haben wohl auch denjenigen 
begeistert, der sonst nicht viel mit 
Systematik im Sinn hat. Allerdings: 
Was GEM kann, kann DOS..., na 
‘ ja, nicht schon lange, aber doch seit 
der Version 2.xx und dabei gibt es 
sogar einige Extra-Optionen, um 
diese Struktur zu nutzen, die man 
bei GEM vermißt, etwa das Schrei- 
ben/Lesen in bestimmte Verzeich- 
nisse, ohne daß dieser ‚„geöffnet“ 
sein muß. Daß dies auch bei erfah- 
renen Usern selten genutzt wird, 
liegt an der etwas umständlichen 
Darstellung des Dateisystems, GEM 
wurde nicht zuletzt deshalb ein Er- 
folg, weil es sich durch seine ICONS 
fast selbst erklärt. 


DIE BAUMSTRUKTUR 


Den ganzen Aufbau einer Ver- 
zeichnishierarchie im DOS nennt 
man BAUMSTRUKTUR. Das 
Hauptverzeichnis, Root- (Wurzel) 
Directory genannt, kann dabei in 
mehrere Unterverzeichnisse ver- 
zweigen. Bitte betrachten Sie hierzu 
einmal die Skizze, in der jedes 
schattierte Kästchen ein Directory 
darstellt. In der Zeichnung ist an- 
gedeutet, daß das Wurzeldirectory 
neben den Unterverzeichnissen 
DAT, TXT) auch Files enthalten 
kann (DATEI.COM). Stören Sie 
sich bitte nicht daran, daß die 
„Wurzel“ oben dargestellt ist und 
aus nur einem Verzeichnis besteht, 
also eher als „Stamm“ bezeichnet 
werden sollte. Dies gehört eben 
mit zu den sprachlichen Ungereimt- 
heiten, die die Erläuterung der 
Hierarchie erschweren. Das Root 
Directory wird dargestellt durch 
den von links oben nach rechts un- 
ten verlaufenden Querstrich, dem 
BACKSLASH (“\“, nicht zu ver- 
wechseln mit dem bei Befehlsop- 
tionen einzugebenden “/“). Das 
Wurzelverzeichnis begnügt sich mit 
diesem Zeichen als Namen. Da es 
auch als das Standarddirectory be- 
zeichnet wird, bewirkt A)DIR \\, 
das Wurzelverzeichnis auf den Bild- 
schirm zu bringen. 

Bleiben wir kurz am Beispiel der 
Zeichnung. Durch die Eingabe von 
A) \DAT wird das DAT-Verzeich- 
nis aufgelistet, in dem nur die wei- 
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teren Unterdateien LIT und KLK 
aufgeführt sind, selbstverständlich 
aber auch „offene“ Dateien liegen 
könnten. Um also einmal an den 
dritten Teil des DOS-Kurses (DOS- 
3) heranzukommen, müßten wir, 
ausgehend von Wurzelverzeichnis 
(!), nur den Befehl folgendermaßen 
angeben. COPY A: \TXT\VLG\ 
KURS\DOS-3, wobei hier einmal 
das Ziel des Kopiervorganges wegge- 
lassen wurde. Mit dem etwas langen 
Parameter ...\TXT\VLG\KURS\... 
haben Sie einen Pfadnamen einge- 
geben, und zwar einen absoluten. 
Ein absoluter Pfadname geht immer 
vom Wurzelverzeichnis (Kürzel ““\“) 
aus und beschreibt den Weg zum 
Zielverzeichnis, bzw. zur Zieldatei. 
Das Wurzelverzeichnis wird beim 
Formatieren automatisch angelegt 
und gilt, wie schon kurz erwähnt, 
standardmäßig als der aktuelle Di- 
rectory, das Prinzip ähnelt dem des 
aktuellen, dem (Standard)Laufwerk. 
Der Befehl DIR (ohne Laufwerk 
und Pfadname) würde also das Wur- 
zelverzeichnis der Diskette im ak- 
tuellen Laufwerk anzeigen. Aber ge- 
nau wie ein Laufwerk kann auch 
ein Verzeichnis ‚aktualisiert‘ wer- 
den. Der Befehl CHDIR \TXT\VLG 
definiert jenes Directory als Stand- 
ard, in dem laut Skizze die Unter- 
verzeichnisse TEST und KURS mar- 
kiert sind. Sie können dann in die- 
sem Directory ohne weiteren Pfad- 
namen jede Datei abspeichern. 
Wenn wir mit GEM vergleichen 
wollen, so ist die ganze Baumstruk- 
tur von DOS also nichts anderes 
als ein System von Ordnern mit dar- 
in enthaltenen Unterordnern. 
Öffnen würden Sie einen Ordner 
mit CHDIR, Sie könnten ihn aber 
über die Pfadnamen jederzeit errei- 
chen, ohne daß ein Window dazu 
auf dem Bildschirm ist. Der Pfad- 
name ist eine kleine Mühe, die 
durch die Vorteile mehr als ausge- 
glichen wird. Statt sich wie bei 
GEM durch mehrere Ordner ‚‚durch- 
zuklicken“, können Sie gezielt ein 
Verzeichnis eröffnen (aktualisieren) 
und dies betrifft nicht nur das Di- 
rectory, sondern läßt sich auch für 
das Schreiben und Lesen von Da- 
teien verwenden und beim Pro- 
grammstart ausnutzen. Vergessen 


Sie bitte nicht, daß es im GEM 


Desktop die Möglichkeit gibt, die 
Befehle von DOS Plus, welches 
diese Dateihierarchie akzeptiert, di- 
rekt einzugeben. 
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Wo ein absoluter Pfadname ist, 
darf auch der relative Pfadname 
nicht fehlen. Beim relativen Pfadna- 
men geht man bei der Beschreibung 
des „Weges“ nicht vom Wurzelver- 
zeichnis aus, sondern vom aktuellen 
Directory. Im obigen Beispiel 
wurde das Verzeichnis aktualisiert, 
in dem ° die Unterverzeichnisse 
TEST und KURS stehen. Mit einem 
relativen Pfadnamen verkürzt sich 
der oben erwähnte COPY-Befehl 
auf COPY A: Kurs\DOS-3. Ein 
absoluter, vom Wurzelverzeichnis 
ausgehender Pfadname, beginnt mit 
dem „\“-Zeichen, ein relativer be- 
nutzt den kurzen Weg vom aktuel- 
len Verzeichnis aus. 


ANLEGEN EINES UNTERVER- 
ZEICHNISSES 


Wenn man bei GEM jedoch in ei- 
nem Verzeichnis einen Ordner anle- 
gen will, dann tut man dies einfach 
in dem geöffneten Fenster, das ja 
nichts anderes als der Inhalt eines 
bereits bestehenden Ordners ist. 
Bei DOS müssen Sie jedoch dem 
MKDIR (MD entspricht der Anwei- 
sung Make Directory) Befehl den ab- 
soluten Pfadnamen mitgeben, Bei- 
spiel: A: MKDIR \DAT\KLK\ 
KASSE (eröffnet Verzeichnis mit 
dem Namen ,„KASSE‘“ im Direc- 
tory der Skizze, das vorher nur die 
drei Kalkulationsdateien enthielt). 

Wenn Sie es wünschen, können 
Sie ein ganzes Laufwerk in diese 
Struktur einbinden. Der Befehl 
JOIN B: PFADNAME behandelt 
die komplette Diskette im Lauf- 
werk B als Unterdatei der Diskette 
im Laufwerk A. Umgekehrt, 
nämlich eine Unterdatei als Lauf- 
werk anzusprechen, geht es natür- 
lich auch. SUBSTITUTE PFAD- 
NAME LW: sorgt dafür, daß man 
dieses Verzeichnis unter dem ein- 
gegeben Laufwerksnamen (A: oder 
B:) erreicht. Besonders wichtig ist 
dieser Befehl nicht, sondern dient 
bestenfalls als Reminiszenz an alte 
DOS-Versionen. 

Der „Spaziergang‘‘ von Verzeich- 
nis zu Verzeichnis erfordert natür- 
lich einiges Training, währenddessen 
unzählige, gar nicht benötigte 
Directorys aufgebaut werden. Auch 
wenn Sie ein überflüssiges Verzeich- 
nis mit dem Befehl RMDIR PFAD- 
NAME löschen können — Dateien 
darf es in diesem Fall natürlich 
nicht mehr enthalten — ist es wich- 


tig, in der denkbaren „Flut“ von 
Dirctorys den Überblick zu be- 
halten. TREE (LW:) (/F) hilft 
Ihnen dabei, indem sämtliche Ver- 
zweigungen in Unterverzeichnisse 
aufgezeigt werden. Der Parameter 
/F listet auch die darin enthaltenen 
Dateien auf. Beachten Sie, daß es 
sich bei ‚„/“ wieder um das Zei- 
chen zum Anfügen einer. Option 
handelt, welches nicht .mit dem 
Root-Symbol (“\“) verwechselt 
werden darf. 

Andererseits bietet das jeweils 
aktuelle Directory genügend Infor- 
mationen, an welcher Stelle des 
„Baumes“ Sie sich gerade befinden. 
Als erstes zeigt natürlich das DIR 
Kommando auch den Pfadnamen 
an und zwar bereits schon im Wur- 
zeldirectory durch das Kürzel „\“. 
In jedem Verzeichnis sind außerdem 
die weiteren Unterverzeichnisse 
durch ihren Namen vertreten. Der 
Orientierung dienen auch die 
beiden Einträge mit einemi (.) und 
mit zwei Punkte (..). Dabei handelt 
es sich um das -Eltern-, bzw. Kind- 
verzeichnis. Um Sie beim Auflisten 
eines Unterverzeichnisses zu infor- 
mieren wann es angelegt wurde, 
wird dieses aktuelle Verzeichnis mit 
einem Punkt repräsentiert. Da es als 
Unterverzeichnis aber nur das Kind 
eines anderen ist, wird auch das El- 
ternverzeichnis , in dem es angelegt 
wurde, mit zwei Punkten darge- 
stellt. Ganz klar, daß das root-Di- 
rectory weder einen noch zwei 
Punkte hat. 


DIE PRAXIS FOLGT 


Hierarchisches Dateisystem, 
Baumstruktur, absoluter und relati- 
ver Pfadname, Eltern- und Kind- 
verzeichnisse können Sie als Termi- 
nus schlicht vergessen, wenn Sie 
den Umgang damit einmal richtig 
geübt haben. In der nächsten Folge 
wird der COPY Befehl durch den 
Einsatz von Pfadnamen zum ‚CO- 
PY LUXUS“. Dabei werden wir 
auch etwas mehr auf die Praxis für 
den PC 1512 eingehen, d.h. die 
Ramdisc erörtern und Wild Cards 
und Joker verwenden. Außerdem 
werden wir klären, unter welchen 
Bedingungen DOS Plus mit GEM, 
DOS Plus oder MS-DOS am besten 
einzusetzen ist. 

(G. Seidel) 


SERIE 


HISOFT-PASCAL 


wi 


WARUM EINFACH- 
ES GEHT AUCH 


UMSTÄNDLICHER 


Der Variablentyp FILE, der in 
Standard-Pascal eine recht einfache 
Dateiverarbeitung ermögicht, exi- 
stiert in der HiSoft-Version icht. 
Soll also das Diskettenlaufwerk zur 
Untätigkeit verdammt sein? Die 
Antwort ist nein, oder: Und sie be- 
wegt sich doch! (Die Disk natür- 
lich.) 

Ebenfalls kein Grund zur Ver- 
zweiflung sollte die Tatsache sein, 
daß die HiSoft-Pascal nur auf Kas- 
sette besitzen. Schalten Sie DDI-1 
und Computer wie gewohnt ein, 
Tippen Sie /TAPE und laden Sie 
Pascal. Als erste Anweisung an das 
Pascal-System geben Sie /DISC. 
Schon funktionieren p)ut, g)et, TIN 
und TOUT mit Diskette! Wir wol- 
len Sie hier nicht zum Raubkopie- 
ren verleiten, aber: HiSoft-Pascal ist 
schnell auf Disk kopiert!) 

Wie in der letzten Folge verspro- 
chen, soll heute eine kleine Schall- 
plattendatei entwickelt werden. Für 
jede Platte wollen wir folgende 
Daten aufnehmen: 

— Titel 

— Interpert 

— Art (LP, MC, CD, Single) 

— Bemerkung 1 

— Bemerkung 2 

— Registrier-Nummer 

Bis auf die Nummer sind das aus- 
nahmslos Strings. Als geeignete Da- 
tenstruktur bietet sich hier ein Re- 
cord an, den Sie im Programm- 


kopf wiederfinden: 
PROGRAM schalldat; 
CONST 
maxplatten = 25; 
TYPE 
string = PACKED ARRAY [1..3#] OF cHaR; 
pdaten = RECORD 
titel : strina; 
interpret : string; 
art : string; 
bem1, bem2 : string; 
reanr : INTEGER 
END; 
dateiname = PackED ARRAY [1..12] OF CHAR; 
VAR 


gesamt, wahl : 


Nun sollen aber nicht alle 25 
Platten ständig im Speicher stehen. 
Wenn Sie „maxplatten‘ z.B. auf 50 
erhöhen würden, ergäben sich dabei 
auch gewisse (Platz-)Probleme. 
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INTEGER; 


Allerdings ist es auch unmöglich, 
eine einzige Datei zur Speicherung 
zu verwenden. Naja, dann nehmen 
wir eben 25 Dateien — eine pro 
Platte. Für jede Datei müssen wir 
lediglich einen eigenen Namen ent- 
wickeln, z.B. “P®®1 .DAT“ für die 
erste “P®®2 .DAT“ für die zweite 
usw. bis “PP25 .DAT“ für die 25. 
Platte. Obwohl AMSDOS nicht so- 
viele Daten zuläßt, schadet es 
nichts, dreistellige Nummern vorzu- 
sehen, die an Position 2-4 in den 
Dateinamen eingetragen werden. 
Das soll folgende Prozedur erledi- 


gen: 
PROCEDURE eintragen (VAX z :' INTEGER); 
VAR 
dname : dateiname; 
platte : pdaten; 
BEGIN 
dname := "Pf .DAT'; 
WITH platte DO 
BEGIN 


URITE 


URITE (Titel: "); READLN; READ (titel); 
URITE 


"Art (LP/Single/CD/MC): 
READ (art); 
URITE er kung 188 
WRITE ("Bemerkung ?: '); REAULN; READ 
WRITE ('Reg.-Nr.: '): READLN; READ (regnr) 
END; 
zZ := 5SUCC (2); 
IF .z <= maxplatten 
THEN 
BESIN 
eintrag (dname,z): 
TOUT (dname,A9OR (platte),SIZE(platte)) 
END A 
END; 


Bevor man sich allerdings daran- 
machen kann, Platten einzutragen, 
sollte man die Diskette mit 25 Leer- 
dateien beschreiben — mit Dateien 
also, die nur Nullstrings enthalten. 
Auch diese Prozedur erklärt sich 
von selbst; 


PROCEJURE vorbereiten; 
var 
i, 3 : INTEGER; 
platte : pdaten; 
dname : datriname; 
3EGIN 
FOR i 
3EGIN 
URITE ("Datei fuer ',i,'. 
Platte vorbereitet.',CHR(3ß)); 
WITH platte DO 
BEGIN 
FOR j 
BEGIN 
titellj] := CHR(B); 
interpret(j] := CHR(ß); 
art[j] := CHr(f); 
bem1lj] := CHR (A); bem2lj] i= 
END; 


'!); READLN; 


; READLN; 


:= 1 TO maxplatten DO 


:= 1 TO Sf 00 


CHR (f) 
regnr := ß 


END; 
dname := "Pfpßp 

eintraa (dname,i); 
EBQUT (dname, ADOR(platte),SIZE(platte)) 


„DAT!; 


END; 


REAU a 
bem?) 


"Interpret: '); READLN; READ (interoret); 


HISOFT 
PASCAL 


Da das Programm die Anzahl der 
bereits gespeicherten Platten 
kennen muß, um für eine neue Ein- 
tragung den richtigen Dateinamen 
zu ermitteln, muß überprüft werden 
können, wieviele Platten bereits ge- 
speichert sind. Das funktioniert re- 
‘ lativ einfach, da man nur der Reihe 
nach alle Dateien daraufhin unter- 
suchen muß, ob sie eine Eintragung 
enthalten: 


PROCED:RE ammelden (VAR z : INTEGER); 
VAR 


leer : BODLEAN; 
dname : dateiname; 
Br : pdaten; 
BEGI 
z 
Tor ı= FALSE; 
WHILE (NOT leer) AND (z © maxplatten) DO 


REGIN 
z := SUCC (z); 
dname := 'Ppppß .DaT'; 


eintraqa (dname,z); 

TIN (Aname, ADOR (platte)); 

IF platte. titell1] = CHR(f) 

THEN 
leer := TRUE 

END; 

z := PRED (z) 

Bei der Eintragung einer Platte 
muß dann lediglich dieser Zähler 
erhöht, der neue Dateiname ermit- 
telt und der Datensatz abgespeichert 
werden: 


PROCEDURE eintrag (VAR dn : dateiname; 
z : INTEGER); 
R 


I} 
IF 2>9 
THEN 
BEGIN 
pP := z DIV 18 
an [3] := CHR (48+p); 
2 := z - (pe1 


Auch der Rest des Programms 
kann beinahe auf einen Kommen- 
tar verzichten. 


EIN KLEINER NACHTEIL 
DES SYSTEMS 


Unser System hat nur einen klei- 
nen Nachteil: Es müssen stets alle 
vorhandenen Dateien untersucht 
werden, wenn wir nach einer be- 
stimmten Platte „fahnden‘“. Die 
nächste Folge wird sich deshalb mit 
einer zusammengesetzten Daten- 
struktur befassen, deren Name 
Ihnen aus einem anderen Bereich 
bekannt ist: den Directories. 


PROCEDURE titelsuchen (z : INTEGER); 
VAR 
i : INTEGER; 
t : string; 
dname : dateiname; 
platte : pdaten; 
BEGIN 
WRITE ("Titel: '); READLN; READ (t); 
FOR i := 1 TO z DO j 
BEGIN 
dname := 'PAßp .DAT'; 
eintrag (dname,i); 
TIN (dname,ADDR (platte)); 
IF platte.titel = t 


THEN 
BEGIN 
WITH platte DO 
3EGIN 
PAGE; 
WRITELN (Titel: '‚titel); 
WRITELN . Interpret: '‚interpret); 
WRITELN ("vorhanden auf ',art); 
WRITELN ("Bemerkungen:');- 
WRITELN (bem1); URITELN bam2); 
WRITELN !Reg.-Nr. ',reonr) 
END; 
URITELN; 
Pie: ("Weiter mit ENTER >> '); READLN 
END 
PROCEDURE katalog (z : INTEGER); 
VAR 


i : INTEGER; 
dname : dateiname; 
plette : pdaten; 


BEGIN 
FOR i := 1 TO z DO 
BEGIN 
dname := 'Pffg .DAT'; 


eintrag (dname,i); 
TIN (dname, ADOR (platte)); 
WITH platte DO 
3EGIN 
WRITELN en 


WR I T EL N ms A t3 te 1 rt 
URITELN (!(',art,')'); 
WRITELN (bem1); WRITELN (bem?); 
WRITELN ("Reg.-Nr. ',regnr); 
WRITELN 
END 
END; 


WRITE ("Weiter mit ENTER >>> !), READLN 
END; 
PROCEDURE menue (VAR uw : INTERER); 
BEGIN 

PAGE; 


WRITELN ("Mini-Plattendatei'); WRITELNs; WRITELN;S 
URITELNS 


WRITELN ('1 ? Datei vorbereiten'!); WRITELN; 
WRITELN hr > Datei anmelden'); URITELN; 

WRITELN ('3 > Platte eintraaen'); WRITELN; 

URITELN r » Titel suchen'!); URITELN 

WRITELN ('5 ? Katalog ansehen'); URITELNS 

URITELN ('f ? Programm beenden!); URITELN; WRITELN: 


WRITE ("Bitte waehlen: '); 
READLN; READ (w); 

- PAGE 

END; 
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DISC MECHANIC 464/664/6128 Diskette DM 69,- 


Disc Mechanic ist das Disketten-Utility Programm, das jeder Schneider Besitzer haben sollte. Disc Mechanic ermöglicht das 
Formatieren und Kopieren von Disketten bis zu 42 Tracks. Dabei werden neue Diskettenformate, die als Kopierschutz 
dienen, mitkopiert. Mit dem eingebauten Diskettenmonitor können Sie ihre Disketten "unter die Lupe nehmen" und 
Änderungen vornehmen. Löschen, Umbenennen sowie das Zurückholen von bereits gelöschten Files ist extrem komfortabel. 
Belegte und nicht belegte Sectoren werden graphisch angezeigt. In den wichtigsten Funktionen ist ein Ausdruck des 
Bildschirms auf einen Drucker möglich. Auf der gelieferten Diskette befinden sich weiter zwei Programme, SPEEDKIT und 
ZERODISC, mit denen Sie Ihre Floppy um ca. 20% schneller machen können. Mit’ ZERODISC lassen sich versteckte und 
unformatierte Tracks innerhalb weniger Sekunden auffinden. Disc Mechanic arbeitet auch mit zwei Laufwerken. Deutsche 
Anleitung. Bei Bestellung Computertyp angeben. Wir weisen ausdrücklich darauf hin, daß nach dem Urhebergesetz (UrhG) 
die Vervielfältigung eines Programms für die Datenverarbeitung oder wesentlicher Teile davon ohne ausdrückliche 
Einwilligung des Berechtigten verboten ist. 


TELE-COM 464/664/6128 Diskette DM 69,- 


TELE-COM 464/664/6128 ist ein Terminalprogramm zur Datenfernübertragung (DFÜ) über die Schneider RS232 
Schnittstelle, das seinesgleichen sucht. Es verfügt über Pulldown-Menues sowie professionelle Fenstertechnik mit 7 
unterschiedlichen Schriften, die im Terminalmodus über ESC-Codes angesteuert werden können; wahlweise deutscher oder 
amerikanischer Zeichensatz, Mitprotokollierung auf Drucker möglich; 50 bis 1200 Baud werden unterstützt, 5 bis 8 
Datenbits, 1 oder 2 Stopbits, Umschaltung zwischen Voll- und Halbduplex, keine Parität, ODD oder EVEN, Up- und 
Download möglich; bei Upload Übertragungsgeschwindigkeit drosselbar, Up- und Download wahlweise in ASCII oder in 
XMODEM (mit XMODEM können Bilder und Binärprogramme übertragen werden), Funktionstastenbelegung möglich; 
Online-Uhr (zeigt die Länge der Verbindung in Stunden, Minuten und Sekunden an), Farbeinstellung möglich. Deutsche 
Anleitung. Sie erhalten beim Kauf dieses Programms ein kostenloses Paßwort für unsere Mailbox. 
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R5232 KONFIGURATION B 
Tritt: EEE, De rn nrensen 
el DEE 
irete METTELE, 


Sim Bits: ER 
Kommmikatinanspar 
Ynlsate: WER, 


AKUSTIKKOPPLER Dataphon s21d DM_269,- 
SCHNEIDER RS232 SCHNITTSTELLE (CPC 464,664) DM _148,- 


SCHNEIDER RS232 SCHNITTSTELLE (cc 6128) DM_178,- 


VERBINDUNGSKABEL nataphon 5214 und RS232 Schnittstelle DM _47.- 


AKUSTIKKOPPLER-PAKET (crc 464,664) DM_489,- 


%# RS232 Schnittstelle, & Anschlußkabel, & Akustikkoppler, & TELE-COM 464/664/6128 


AKUSTIKKOPPLER-PAKET (cpc 6128) _ DM_519,- 


% RS232 Schnittstelle, & Anschlußkabel, & Akustikkoppler, & TELE-COM 464/664/6128 


Versand per Nachnahme oder Vorausscheck zzgl. DM 8,- Versandkosten 
TELEFONISCHE BESTELLUNGEN MÖGLICH 


GIGGE ELECTRONICS 


Abt. 9SA - Schneefernerring 4 - 8500 Nürnberg 50 
HOTLINE bis 20 Uhr - Tel. 0911/84244 


DIIHIIIIEDDIDEIDIIHIDIIEIDIIEDIIIEIILECHEECEHELCEHELLEHeeLeRLeren OFFER 
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CPC 464, grün, Joy, div. Pro- 
gramme, Literatur wg. Sy- 
stem-Änderung, 7 Mon. alt, 

5 Mon. Garantie, VB DM 
600. Tel. 02233/4566. 

CA 70 SP + Anw. Progr. für 
CPC. Info-Liste Anf. R. Hoe- 
ger, Friedrichstr. 9, 7317 
Wendlingen. 

HI-80 (Epson-Plotter)-User 
Kontakt-Programmaustausch 
gesucht. Auer, Spessartstr. 1, 
6987 Külsheim, Tel. 09345 / 
6373. 

Suche — tausche Software für 
CPC-6128. Schickt Eure 
Listen an D. Pilger, Am Het- 
zepetsch 7, 5000 Köln 71. 
Schneider CPC-464 — Origi- 
nale auf Disk + Kass. zu verk. 
oder Tausch ab 15 DM .— 150 
DM Stück. G. Heiler, Pariser 
Str. 177, 6750 Kaiserslautern. 
Tausche CPC-Software auf 
Disc. jeder Art. Garantierte 
Aut. St. Kiesel, Heckkaten- 
weg 11, 2050 Hamburg 80. 
CPC 464 + Grünmon. + Soft- 
ware f. 350 DM zu verk. Tel. 
0521/43269. 


Eu ESEL 32. SZ 2.32. DZ ZU ZU DZ ZU 2. 2 ZU ZZ ZU 2 ZU ZZ 3 


"* super...super...super * 
Verkaufe: 1 Vortex FlS nur 
590 DM, 1 Vortex SP 64 DM 
160, Uli Doraszelski, Post- 
fach, 7920 Heidenheim, Tel. 
07321/46664. 

Kaufe Software + Zeitschrif- 
ten + Bücher + Peripherie für 
den CPC 6128. Angebote an: 

H. Growe, Hippenkamp 1, 
4840 Rheda-Wd. PS: Suche 
6128-User im 48-PLZ-Gebiet 
zwecks Erfahrungsaustausch. 
CPC 464 (Farbe) + Vortex 
514 Laufwerk + Seikosha 
GP 700 (Farbdrucker) + 40 
besp. Disketten + div. Bücher 
+ Literatur + Anwendersoft- 
ware. Alles 10 Monate alt. 
Wegen Systemwechsels für 
1700 DM zu verkaufen. H. 
Hützen. Tel. 02182/3962. 


Wegen Systemumst. z. ver- 
kaufen: Texpack, FiBu-Star, 
Lager-Star, Sekretariat, Bud. 
get-Manager, Kassenb., Tur- 
bo-Adress, Vereinsvern., F. 
CPC 464. 50 % unter Neu- 
preis. (Originale). Bessler, 
Eppsteiner Str. 24, 6233 
Kelkheim 2. 

* Tausche Software für CPC * 
* Tape/ -Schneider- /Disc *. 
Rolf Eppinger, Fraunhofer- 
weg 4, 7440 Nürtingen. 


Systemwechsel = CPC 664, 
10 Monate, Green 500 DM, 
original Programme: Pro 
Text/pro Dat 30 DM, CYRUS 
CHESS II 30 DM, Etatcall 

40 DM, RH-DAT 30 DM, 
EMS-Datei 40 DM, auch 
einzeln. Tel. 0209/209732. 


CPC 6128 (grün) + Progr. 

750 DM, Cumana 5 1/4 “ 
Floppy 340 DM, Datenrecor- 
der 60 DM oder kompl. mit 
Lit. + Zeitschr. + Sonderheft 
+ Bücher + Datamat + Copy- 
master + Spielen 1200 DM. 
Tel. 02302/84363, ab 20 Uhr 
Verkaufe: dk-tronics Light- 
pen für CPC 464/664 inkl. 
Software für 60 DM. Lan- 
genscheidt alpha 8, elektro- 
nisches Wörterbuch deutsch/ 
englisch für 100 DM. Tel. 
06131/54127. 

Verk. CPC 464 Color + Joy + 
Abdeckhaube + Software + 
Literatur + alle Schneider Ma- 
gazine/Sonderhefte für 1000 
DM. Tel. 0911/396941, ab 

16 Uhr. 

* Tausch! Tele: 07022/8763 
* Tape Schneider! Disc * 

* Software! 

Tausche Basic-Prog.-Shorter 
Profiprog., kein Standard-S., 
(alle CPC) gegen orig. Word- 
star o. D-Base II o. Multiplan/ 
jeweils mögl. deutsches Hand- 
buch/3 “ D. gegen 3 ““ D. Gre- 
gor Rühl, Telefon 02151/ 
481863, 4150 KR 11, Burg- 
str. 19 d, nach 19 Uhr. 
Top-Preise telef. bestellen bei 
0821/91115 M + K Software 
Gunfright 33 DM /S. Fox Strip 
Poker 32 DM / Bomb Jack 

28 DM, Mission Elevator 

34 DM / Cas. 

M+K Software Volker Mayer 
Römerstädterstraße 2a 

8900 Augsburg 22 


-.-- - - — - - - - - - 


**  DISKETTEN **. 


”* je 10 Stück nur =. 


3Z0l ab DM 79,00 
3,5 Zoll ab DM 44,00 
5,25 Zoll ab DM 11,95 


INFO von C.V.T. 
Postf. 2106, 5500 Trier 


CPC464 CPE664 CPC6128 
USER! 
Lichtgriffel 
mit Programmen und 
deutscher Anleitung 
nur DM 49,— - 
Versand gegen Scheck/Nach- 
nahme. Info gratis! 

Fa. Schißlbauer 
Postfach 1171S 8458 Sulz- 


bach, Tel. 09661/6592 bis 21h 


} 


* Software? Tele: 07022/ 
8763 * * CPC * CPC * XCPC 
* CPC * * TAUSCH * 

Biete an CPC 464 mit Grün- 
Monitor, 3- u. 5 1/4-Zoll- 
Disc., div. Literatur, Text- 
verarbeitung und andere Pro- 
grämmchen. VB = DM 600. 
Anfragen bitte unter Tel. 
02947/4188 (CP/M, Dr. 
LOGO: DBase II W/64-K- 
Speicher nicht Lauff.). 
Vortex-Floppy F1-DD zu 
verk. Doppellaufwerk 5; 25 
neuwertig inkl. original Word- 
star VB DM 1600. Winfried 
Adam, Dreimühlenstr. 14, 
8000 München, Tel. 089/ 
7254334, ab 17 Uhr. 

Suche 1 Matrix-Drucker: 
Schn. DMP 2000, Panas. 
1091 0. 1092, ok, 192/193, 
Lightpen inkl. Softw./alles 
mit deut. Handb., ordentl. 
Zust. + preiswert f. Schneider 
6128. Gregor Rühl, Tel. 
02151/481863, 4150 KR 11, 
Burgstr. 19 d, nach 19 Uhr. 
Suche Kontakt zu CPC-An- 
wendern. Bin bes. am Info- 
Austausch bei Probl. mit Prg.- 
Sprachen Highsoft-C, Small- 
C, Turbo-Pascal, dBase inter- 
essiert. W. Schmidtel, Genos- 
senschaftsw. 11, 8701 Rei- 
chenberg. 

Für nur 30 DM programmie- 
re ich Ihr Pers. Datenbank- 
progr. unter CP/M. Lieferung: 
Kass + Anltg. (Cload). Anga- 
ben: Titel, gewünschte Anz. 
Sätze, Datenformat. Info gg. 
Rückporto. Th. Scheer, 
Friedrichstr. 16, 3550 Mar- 
burg. 

Schneider-RS232 + Beschr. 
99 DM, Orig. CPC-Termy 3 “- 
Disk 39 DM, orig. Devpac- 
Ass-Deb/Kass. 79 DM, orig. 
Tasword-Ghostbust, je 29 
DM, orig. Centrecourt-Ten- 
nis 29 DM, Buch DFÜ Data 
Becker neu 29 DM und 13 
Disk. 8 “ in Hardbox 15 DM. 
Tel. 07431/6566, ab 18 Uhr. 
CPC 664 Hard- & Software 
z. B.: Painter II, Mailbox, 


Tank Arcade, V24 Multi Port. 


Info gegen 2,50 DM. Ruhr, 
Montzstr. 28, 4048 Greven- 
broich. 

CPC 464 Color m. Vortex SP 
320, 2 Disk-Laufw., Itho- 
Drucker, Orig. Softw., dBase 
II/WS, Zubeh., Bücher/40, 

3 “ Disk. für nur 3500 DM zu 
verk. H. Kessler, Schlichtern- 
heide 26, 3105 Faßberg, Tel. 
05055/8843, ab 18 Uhr. 


Wer gibt mir Umibauhinweise 
zum Anpassen des Datenre- 
korders Laser DR 10 (Schalt- 
plan vorhanden) an CP C 
664? P. Posse, Brauckweg 8, 
4620 Castrop-Rauxel. 

CPC Kontakt — Kein Beitrag! 
Keine Gebühren! Tausch von 
Original Soft- und Hardware! 
R. Lukas, Im Junkerbruch 3, 
5143 Wassenberg 4, Tel. 
02432/3498. 

Verk. Orig. Star-Writer I+ 
Profi-Painter wg. Nichtge- 
brauchs je 100 DM. Tel. 
06155/62595. 


Tausche + Suche CPC-Softwa- 
re aus dem Bautechnik-Bereich 
für den CPC 6128. Auch CP/M- 
Software aus der Technik.Vol- 
ker Meyer, Dieckbornstr. 43 
3000 Hannover 91 


Suche Floppy DDI - 1 Tel. 
04238/1035 


Superschneider 464.in Metall- 
gehäuse, abges. Tastatur- Mo- 
nitor mit eingeb,3”u. 5 1/4 
Laufwerk 512K.Vortex Erw. u. 
VRS-Modul/Preis VS. Nähere 
Info unter Tel.02158/4969 von 
20.00 bis 21.00 Uhr Tagsüber 
Te1.02151/8282813 


NEU IN 5470 ANDERNACH 
Schneider Hard- und Soft- 
ware z.B. 3° Disk nur DM 9,50, 
5,25‘ Disk 10 St. DM 19 95. 
COMPUTER-CORNER, 

Tel. 02632-43119 

Verk. CPC-664, V24, Recor- 
der, div.orig.Progr.Preis 
VB.nur zus.verk.auch noch 


“ Apricot FIPC 8086 CPU, MS- 


DOS 2.11, Async GW-Basic, 
Infrarotmaus, Infrarot-Tastat- 
ur etc. Tel. 95141/47723. 


Der NLQ 401 (Baugl.)am CPC 
464 kann jetzt LETTER- 
QUAL. und zeichnet wie ein 
PLOTTER Info gg. Freium- 
.:Wendorff, Am Flasdik 5, 42 
Oberhausen. 


KEREr PROGRAMME 
VON ARNOR **%*% Siehe 
SCH. AKTIV 10/86, $.82 
PROTEXT (dW/R) DM 99/158; 
PRO- MERGE (d/R) DM 99/ 
139, MAXAM (d/R D 99/158 
UTOPID 11 G Denisse Postfac 
106421 2 Bremen 1 


Schneider CPC 464 Software: 
Spiele & Anwenderprogramme 
z.B.: Einkommensteuer/Loja 
1985: Kassenbuch: Lohnab- 
rechnung: Finanzbuchhaltung: 
u.a. Klaus Bartram Haard- 
waldstr. 1-7 6000 Frankfurt 71 
Tel.: 069/6 70 22 30 


Suche Anleitung zum Taifun- 
Compiler, tausche Software f. 
CPC- 464 nur auf Kassette, bit- 
te eure Liste an:Lam-Soft. 
Dennerstr. 100, 7000 Stuttgart 
50 


Suche im orig.Star Writer f. 
CPC 6128 / sowie Kontakt zu 
User/in) Raum Berlin,/,Car- 
sten Colonius Jonasstr. 31, 
1000 Berlin 44, Tel. 030/ 
6223695/ 


Verk. wegen Systemwechsel 
original Data Becker Progr. mit 
Handbücher f. 6128 Textomat/ 
Datamat/Profimat/ Mathemat/ 
je DM 60,--, Tel. 02106/40977/ 
45620. 


Suche Tauschpartner f. 664-Sp. 
+ Anwendungen im Raum 
Hamburg sowie f. den C- 
16,Tel.040/6438691 


Suchen Sie ein Progr.f.Ihre pri- 
vate Kontoverw. dann rufen 
Sie einfach bei Tel. 07221/ 
82690 an.Kosten f. Progr.u.Be- 
schr.ohne Disk. DM 10,--, 


Suche Software aller Art. für 
CPC 6128 (Disk. + Kassetten) 
evtl. auch Tausch möglich. Li- 
ste an. Marco Gisi, Bäumlihof- 
weg 2A. 5035 Unterfelden/ 
Schweiz. 


Matrix-Drucker Seikosha, GP- 
500A mit Anschlußkabel 
Neuw. DM 560,--, für nur DM 
290,--, Programm-Tausch 
Disk. an. Michael Eckert, Zo- 
belreuther- Str. 30,8670 Hof/ 
Saale. Tel. 09281/95166. 


*-Verkaufe: 3”Floppy *- 
Orig.-Schneider:-DM 300,--, 
%-Matrix-Drucker CP80-sehr 
gutes Schriftbild-(Quadr. - Na- 
deln!) evtl. m. Kabel. DM 400,- 
-,Tel. 09131/207996. 


Schneider CPC 464 grün 2 
Laufwerke eigene Software, 
Disk. wg. 
VB.Tel.06120/4175 


464 mit Vortex 128K, Floppy, 
Software, Joystick,464 nur 
kompl. abzugeben, Gesamt- 
preis DM 1.700,-, Tel. 02204/ 
60324. 


Farbe u.Ton CPC auf jedem 
Euro-Scart Fernseher, das Ka- 
bel fertigt Ihnen zum Preis DM 
60,-,Tel.06655/ 7156. 


Wo ist welcher User-Club 150° 
Clubadressen sortiert für DM 
50,-,Schein/V-Scheck M.Pak- 
meyer Grüner Jägerweg 9, D- 
3180 Wolfsburg 22 Spezialge- 
häuse für MTX 500/5 12 Info 
gegen Rückporto an obige 
Adresse. 


Systemwechsel 


BÖRSE 


Wer erstellt mir ein Bio- Rhyth- 
mus-Progr.nach meinen Anga- 
ben.Peter Paske/ Tel. 05931/ 
7177. 


CPC-464  Color-512K-DDII- 


Flix- AMX-Maus-Sprach- 
synth.-4er ROM-Karte-2 
Sticks-orig.sw. Bücher-Zeit- 


schrift.-etc. VB. DM 2.300,- 
- ausführl. Liste ‚80 
Pf.Tel.0711/572227. 


Original-Programme für CPC 
464 (Disk.) wenig gebr.Texto- 
mat, DM 70,- Platinenkit, DM 
120,-beide Programme mit 
Handbuch, Tel. 0681/871276 


Verk. orig. Data Becker, das 
CP/M-Trainingsbuch zum CP/ 
M, DM 39,-,CPC Tips u. 
Tricks, Band II, DM 31,-,CPC 
664/ 6128/Intern. DM 55,-,Su- 
perspiele u. Utilities für CPC 
(Vogel-Verlag)DM 30,- Zan- 
zen Georges,Puits-en- Sock 
52,B-4020 Liege, Tel.041/ 
429400. 


. CPC 464 Disk. Vortex, Maus, 


LP, viel Hardware, über 100 x 
Profi-Software, Spiele + Ei- 
genentw.5 Data Becker, Bü- 
cher.VB. DM 990,-,(Auch ein- 
zeln)Info oder Liste bei U.M- 
aaß/Tel.07083/8381. 


Verkaufe Original Software* 


.Hunt.Kill(D) DM 30,-Sorcery 


(D)DM 15,-,Beach !!! (C) DM 
15,-,Nonterraqueous.Soul of a 
Robot, Formula-1-Simmula- 
tor Finders Keepers je (C) DM 
5,-,Pro Lfg.+3 DM Versand- 
kosten, Tel.06691/ 22316. 


Wer hat ein Listing für Drucker 
Okimate 20, damit ich Grafik- 
bilder 1:1 ausdrucken kann? 
Wäre dankbar wenn es jeman- 
den gibt, der mir weiterhilft- 
‚Antwort an: Wilfried Burg- 
hardt, Postfach 610243,6800 
Mannheim 61. 


Joyce PC wenig benutzt 10 Dis- 
ketten. Das große Joyce Buch, 
Siebert,Prakt.Textverarb.mit 

Joyce und Lerndisk. Disk,Box, 


alles zusammen für DM 
1.250,-, zu verk. Tel.07633/ 
82413 


Suche Software für Joyce 8256 
insbesondere Karteiführung 
mit Möglichkeit zum Erstellen 
von Serienbriefen.Heinz 
Buschjost Tel.05192/3415 


Verk. DK. Tronics Speicher- 
Synthesizer DM 70,-,!! Müller- 
Lightpen mit Software DM 
50,-,Schneider-Joystick DM 
15,-!!alles kaum benutzt. Tel. 
030/4159090 /Elge Th. 


Tausche Programme auf Disk. 
Listen senden an: Rodriguez 
Miguel, Melanchthonstr. 
21,3008 Garbsen4. 


Suche Kontakt zu anderen 
CPC-464-Anwendern.Frank 
Schnitzer,Gabelsbergerstr. 


14,6143 Lorsch. Tel.06251/ 
51131. 

CPC-6128 CPC-6128. Suche 
zuverlässige Tauschpartner 


für Spiele und Anwendungen 
auf 3. Zoll-Disk.f. den CPC 
6128! Tausch-Material vorhan- 
den! Listen bitte an : Yves Hu- 
berty,27,OP Baessent- Wiltz- 
Luxemburg 


Okimate 20 bietet seine Dien- 
ste an: Für einen Unkosten- 
beitrag von DM 10,- druckt er 3 
Farb-Hardcopies auf Folie- 
.Te1.030/4159090 


Veg Onsker ä fä Kontakter til 
CPC-Freack i Skandinavien- 
.Dere mä gjerne skrive pä De- 
res morsmäl. Joachim Senf,Ha- 
lemweg 31, D-1000 Berlin 13. 


Verk. gebr. orig. Software: Sa- 
mantha Fox-Strip-Poker 3” 
Disk. DM 30,-, Hanse DM 25,- 
Zorro DM 20,-,Fighting - War- 
rior DM 20,-, Gremlins DM 
20,-,Airwolf DM 15,- Think 
DM 10,-, und andere. Tel. 030/ 
4159090.Elge Th. 


Verk. Floppy-Buch von Data 
Becker plus Spiel-Buch von HC 
zusammen für DM 30,-,Tel. 
030/ 4159090/ Elge Th. Suche 
Farbmonitor f. CPC. Biete DM 
300,-, plus MPI Tel. 
4159090 Elge Th. 


Wegen Aufgabe des Hobbys!!! 
CPC-464 Grün+ Lit+Software 
DM 450,-,Vortex-Fl. 
FS1+Dis. Lit DM 850,-,Druk- 
ker Speedy + Kabel DM 
490,-,CPC-Int/ Magazin/Son- 
derhefte!Joystick DM 
25,-,Tel.02771/31867. 


Verk. für CPC 464, Easy Graph 
und Hyper Sports. Info für DM 
1,- anf. Tel. 08239/1541 


Verk. Apple Vc Kompl.mit 
Monitor-Gerät kaum ge- 
braucht für DM 1.59,- 
Te1.0651/48492 


030/ 


++Achtung++ Böhm-Orgel- 
Top Sound,Stahlfuss mit /oh- 
ne Boxen, Spitzen Sound, viele 
Extras Tel. 07821/25118 


Wichtig. Suche Russisches 
(Lern)Progr. Angeb. und Infos 
an:Ralf Beckmann ,Stei- 
gerstr.15 4750 Unna/PS.Drin- 
gend!!! 
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Verk. orig. Hisoft-Pascal mit 
Handbuch für _ CPC-464 
554,Tel. 02391/13073. n. 18.00 
Uhr. 


Verk. preiswert.Mannesmann 
Matrix Drucker und fertigen 
Anschluss an TI99 /4A Compu- 
ter, DM 590,-, Te1.02103/65289 


Anfänger CPC 6128 sucht An- 
schluß an Club o. Privat in 
Köln.Tel.0221/552208. 


Verk. oder tausche folgende 
orig. Spiele,Elite DM 30,-, 
Lords od. Midnight DM 25,-, 
Jump-Jet DM 25,-,Marco Polo 
DM 25,-,für Schneider auf 3” 
Disk. Tel.02103/65289. 


*%Guazuela®%Strategie-Sp. 
f.ein Spieler, der in die Rolle 
des Präsidenten einer Bana- 
nenrepl. schlüpft, 3” Disk. 
DM 25,-,‚Kassette DM 15,-, 
CVS o. Scheine) bei Thomas 
Naumann, Blücherstr.12, 2300 
Kiel 1. 


Prof. Ausgabenverwaltung. für 
Privathaushalt.Sparkonto,2 
Eink. 14 Ausg.- Posten, in- 
tergr. Statistik mit Grafik, 34 
Auswertungs- seiten, Hardco- 
py.Alle CPC DM 40,-, (Disk.) 
Info + Best. bei G. Lorsche, 
Fox- enhiel, 22,L-3473 Dude- 
lange/Luxemburg. 


Druckerkabel für CPC 464 und 
Drucker mit paral.Intface 
z.B. Epson od.NLO 401 DM 
20,-,Tel.06638/1503 


Gibt es in meiner Nähe einen 
Computer-Club od.Compu- 
ter-Freak, der mir beim Ein- 
steigen auf meinen Joyce be- 
hilflich sein kann? Tel.05973/ 
2502 


Verk, CPC 464, Farbe,2xJoy- 
Vortex Doppel Floppy-1,4 
MB, reichh, Software, Progr.u. 
Spiele, Fachliteratur, Druk- 
ker-NLQ401,mit Traktor-.DM 
3.000,-,Te1.02081/846714. An- 
rufe Nachmittags. 


Lern- u. Trainingsprogramme: 
Schulfächer, Konzentrations- 
u. Verhaltenstraining. Liste 
anfordern: Dr. Kolb, Bergstr. 
34, 6900 Heidelberg, Tel. 
06221/474711 

CPC +SP512+DD1+FIX 
+ Eprommer + Rombox + 
NL! 401 + Traktor + DKSPA 
+ RSV 24 +143 “ Disk + 11 
CPC Buech + 24 Softw. Cass. 
+ kompl. CPC-Kurs + CPC 
Assem. + Text Adr. + Tele- 
term, zus. NP 5800 DM für 
3300 DM VB, Tel. 09544/ 
2398. 


Suche Software f. CPC 464! 
Weiterhin fehlt mir noch ein 
Drucker,Zuschrift. an: Günt- 
her Lauer, Hauptstr. 9 5521 
Preist/Eifel 


Erstelle Sicherheits-Kopie von 
allen Programmen, von Disk- 
zu Disk. Beide Disk. + DM 
10,- an. Bernd Schrade, Iber 
24, 8451 Hahnbach. 


Tausche Software f. alle CPC s 
auf Disk, suche außerdem gu- 
tes Diskmanager-Progr. Stefan 
Kuske ‚Bredestr.4 5630 Rem- 
scheid 11 


Verk. Genie II kompl.-System 
mit 2 Disk.-Laufwerken, Basic- 
Code- Interface, CP/M 2,2 Ze- 
nith Monitor (grün) mit Fuß- 
‚Software und Literatur.Ge- 
samtpreis: DM 850,--(auch ein- 
zeln).Tel. 0201/594323. 


Verk.  Schneider-Aktiv-Heft 
11/85- 10/86 kompl. ++DM 
30,--, Tel. 08441/4378/ Abends. 


Software CPC 464 wegen Sy: 
stem- Wechsel zu verk. Budget- 
Manager ungebr.DM 50,-- 
Multiplan ungebr. DM 100,-- 
Fibuking DM 40,-- Etagraf DM 
30,-- Henning Schulz 
Tel.06355/2049 


+++Suche für CPC - 464 
+++ +Erstfloppy (5,25 Zoll) 
mit +++ +Controler oder nur 
Controler. Angebote an:Diet- 
mar Pilger Tel. 0221/707876. 


Suche dringend+++ Jurastu- 
dent sucht zur Unterstützung 
des Studiums preiswerte Pro- 
gramme.Urteile, Schemata- 
‚Definitione 0.A.E.Tel. 0921/ 
61553 Thorsten Ried,Wallstr. 
17 8580 Bayreuth. 


Von wem bekomme‘ ich 
(Tausch o. Bezahlg.) eine 
Hard-Copy-Routine unter T- 
Pascal/CPM als funkt.Quell- 
text? Zuschrift an:Thorsten 
Beckhuis Fahlenkampsweg 2 
2400 Lübeck 


Verk. Schneider CPC 664 mit 
Farbmon. 5 1/4” Vortex- 
Zweitläufwerk Akustikkopp- 
ler,Software, (u.a. Budget-Ma- 
nager) Literatur einzel. od. 
kompl. gegen Gebot.Tel. 040/ 
3599/495 0d.040/8509854 


Orig.Software für C64 zu Top- 
Preisen z.B. Fight II DM 85,- 
-,‚Two on Two DM 30,-- Alter 
Ego DM 40,--,‚Commix- DM 
40,--,Geos DM 50,--‚Kosten- 
lose Liste anfordern. B.Kom- 
mode,Th. Heuss-Platz 2, 7012 
FellbachTel.0711/57222 ab 
19.00 Uhr. 


BÖRSE 


Ich steige um! Daher Räu- 
mungsverkauf imeiner orig- 
Software ca. 100 Progr. für den 
CPC 464 zu Spitzenpreisen! wie 
- wo ? einfach Liste anfordern 
bei B. Kommode, Th. Heuss- 
Platz 2 7012 Fellbach, Tel.0711/ 
572227 ab 19.30 Uhr. 


Zu verk. CPC 6128 inkl.Hand- 
buch Disk.-Software, Farbmo- 
nitor, 10 Monate alt. Preis DM 
1.500,,-. Tel.02241/336002 


Biete an: CPC-464 grün DM 
600,- + Literatur zum CPC DM 
90,-- +Software, u.a. Schach 
DM 110,- verk. nur unter Ab- 
nahme des ges. Angebots.Tel. 
07364/6726 


Verk. CPC-464, Farbe DDI- 
1,15 Disk. gefüllt. Disk.Box, 
Orig. Spiele (House of Usher, 
Blagger, Hexenküche, u.s.w.) 
Orgin.Turbo- Pascal+ Grafik- 
Erweiterung, viel Literatur, 
kompl. für nur DM 1.800,- 
-,Tel.05371/51686. 


Suche Datensammlungen wie 


z.B. sämtliche Unfälle in 
AKW-s o. aus dem Bereich 
Sonnenenergie u.s.w.Habe 


Interesse an einer ”Datenbank 
Bundesweit” Kurz-Info. an 
Lothar Baur, Blücherstr. 
34,1000 Berlin 61. 


Zu verk.nur satzweise, je Heft 
DM 2,--,‚Schneider Aktiv,11/ 
85- 7/86, Computer Team 10/ 
85-2/86 CPC-Schneider Maga- 
zin, 12/85/9/86 CPC-Schneider 
Int.7/85/9/86 Data-Welt, 4/85/ 
4/86 HC-4/5//85/10/85/7/86,9/86 
Happy-Computer 4/85/9/86 
Heinig Manfred, Kie- 
fernstr.3,4155 Grefrath 1 


Suche NLQ 401 und Kabel, 
Zahle DM 200,--,Suche günsti- 
ge Software-Kassetten f.CPC- 
464 wie Elite, Ping-Pong,Get 
Dexter, Soccer, Mission Elen, 
Lotto, Colossus, Musucs, Mac- 
.Progr. Tas. Print Statisten- 
Progr., etc. Listen und Ange- 
bote an: Neuman Bernt, Kö- 
nig-Karl-Str. 36, 7000 Stuttgart 
50 : 


Joyce 512 K/B2 Laufwerke und 
RH-Dat und Multiplan und 
dBase II und Wordstar Mail 
Merge und Literatur kompl.ab 
Köln DM 2.500,-- Abends. Tel. 
0221/4456500. 


CPC-464 (Farbe) 10 Monate 
alt, Vortex 5,25 Einzellauf- 
werk, Seikosha GP 700 CPC 
‚„Farbdr.inkl. Spiel und Anwen- 
derprogr.wegen Systemände- 
rung für DM 1.600,- zu verk. 
Tel. 02182/3962. 


* DRUCKER für CPC * 


GLP (ähnl. NLQ 401) 398,—- 
PANASONIC 1080 555,— 
CITIZEN 120 D 555,— 
CMC-CPA 80 GS 555,— 
INFO anfordern von C.V.T. 
Postf. 2106, 5500 Trier 


Verk. CPC- 6128, grün Moni- 
tor NLO 401 sowie div. Zube- 
hör, evtl.auch einzeln. 
Tel1.04017/208559 


Erst-Floppy und Turbo Pascal 
für CPC 464 zu kaufen ge- 
sucht. Tel.02405/5735 


Verk CPC 6128 auf Disk.Orig. 
Wintergames und Poolbillard 
und Tennis je DM 25,--, Tel. 
089/797672. 


Orig. Elite (Disk.) mit Hand- 
buch für DM 40,--,zu verk./su- 
che Kontakte zu anderen 
Schneider Usern im Raum HH. 
Tel. 04122/42195,M. Lause. 


Programm-Gratis Info für 
CPC’s be Neupe 847 Pfrei, 
Postfach 72 


Verk. CPC 464 mit: Color o. 
Grün. 512 KB, Vortex F 1D 
+3” + viel Software 
VB.2.350,- Tel. 0911/329558 ab 
17.00 Uhr. 


Tausche Spiele 664/464 auf Ta- 
pe u. Disk. Schickt Liste. 300 P, 
habe Spiele wie Le 5 em Ex 
Who, Eden Blue. Ich verk. 
Orig.Dragons Gold/St. Davis 
Snooker/Hypersports a. DM 
15,--, Suche Crmass. Michael 
Schlitt, Fasanenweg 1 4459 
Ulzen 


CPC 464 mit Vortex-Erweite- 


rung SP 512, Doppelfloppy 5 1/ 
4 u. Gerdes Mouse, sowie Star- 
Writer 1, Multiplan und dBA- 
SE und jede Menge Spiele und 
Progr. mit Literatur bei Selb- 
stabholung DM 3.000, ( ca. 30 
Disk.).Tel.02101/ 604278. 


Hallo CPC-User!! Ich suche f. 
folgende Spiele möglichst eine 
deutsche Gebrauchsanwei- 
sung :M. Andromeda, Ghost- 
buster, Friday the 13, Flight- 
Path 737/ Als Gegenleistung 
werden andere Programme an- 
geboten. Bitte vorher anru- 
fen. Tel. 05353/2674. 


CPC- 664 mit Farbmonitor,52- 
KB B-Vortex-Erweit., Joy- 


stick, Sprachmodul,Wordstar- 


Textverarb. Sprachprogr, Gra- 
phik-Adventure, div. Spiele, 
div. Bücher & Zeit- schriften 
sowie 35 Disk. VB. DM 1.750,- 
-,Te1.030/7718676 
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dBase II für '6128-orig.DM 
140,-. oder gegen Tausch 
Wordstar, div. Spiele auf Kas- 
sette und 3 Zoll Disk .Elite,Bla- 
de-Runner,Tauceti, Marco Po- 
lo etc.günstig abzugeben, Liste 
gegen Pf.-80,Farbmonitor 
GTM 644 einzeln zu kaufen ge- 
sucht. Friedhelm Gardemann- 
‚Postfach 1246 3590 Bad Wil- 
dungen. 


Schneider CPC 464,Grün 6 Da- 
ta - Becker B. Oevpack-A55, 
viele orig.Spiele,(Schach)Flug- 
sim. 10-Kampf,Flipper, u.a.al- 
le Schneider-Zeitschriften 
+Sonderhefte, LA 300 An- 
wendung und Spiele-Progr.als 
Listing. Tel. 06104/5211. 


CPC 6128 , Kontakt zu Users o. 
Club gesucht. Suche alles mögl. 
was man unter Progr.versteht. 


Adresse: Günter Merten, 
Jungenwaldstr. 28, 6645 
Beckingen. 

CPC-464 + _ Color-Moni- 
tor.+Sp- 512+NLOQ- 


401+DDI-1+F1-X+dK- Tro- 
nic, Sprachs. +20 Disk. 3”+2 
Disk.-Boxen + Bücher/ca. 
10)+ Zeitungen+Software we- 
gen Systemwechsel.DM 2.500,- 
-, Tel. 02191/65878. 


CPC-464-Color+DDI-1+FI- 

SPS51 2+NLOQ401+Trac- 
tor+dKtronic-5 Stereo- 
Sprachsyntheziser+10 Blue- 
Cher+16 Disk.3”+dBase- 
+Wordstar + u.s.w.wegen Sy- 
stemwechsel gegen Gebot Mi- 
nimum=DM 2.500,-- Reinhard 


Gleitz,Augustenstr. 4 5630 
“ Remscheid 11 
Prof. Ausgabenverwaltung 


für Privathaushalt.Sparkonto, 
2 Eink, 14 Ausg. Posten,int. 
Statistik mit Grafik, 34 Aus- 
wertungsseiten, Hardcopy, für 
CPC DM 40,-- (Disk.) Info- 
+Best. bei G. Lorsche, Foxen- 
hiel 22, L-3473 Dudelange/Lu- 
xemburg. 


32:2Schneider CPC 464 K &% 
Wer wohnt im Raum Köln 
(spez. Overath) und möchte 
Erfahrungen etc. Austau- 
schen, Tausche auch Anwen- 
derprogr.und Spiele. (Dis- 
k.+evtl.Tape). Tel. 02206/6642 


CPC 464-Vortex 512KB-Color 
3+ 5”Floppy/RS232/Div- 
.Progr. DBASE/C-Basic/Smal- 
C/Profi-  Painter/Budget-Ma- 
nager/Termstar/div.Kassetten- 
Software/ ca. 40 Data-Becker/ 
M&T/SybexBücher. Neu- 
preis:ca DM 7.000,- VB: DM 
4.000,-,Tel.0211/673647. 


Leicht hat er es sich nicht gemacht, 
und viele dachten: ‚Was der vor hat, 
das geht gar nicht.” Thomas Vervost, 
Autor des Profi Painter CPC, hatte sich 
ausgerechnet die stärksten Grafik- 
programme als Konkurrenz und Maß- 
Stab ausgesucht. Sein ehrgeiziges Ziel: 
Er wollte ein Programm schreiben, 
das eigentlich unmöglich ist - den 
Profi Painter CPC. Einfach zu bedienen 
sollte es sein, schnell sollte es sein, 
flexibel sollte es sein. Kurz, seinen 
großen Vorbildern aus der 32Bit-Welt 
möglichst wenig nachstehen. Nur 
eben auf einem 8Bit-Rechner. Und das 
Ergebnis? „Die Geschwindigkeit und 
die vielen Möglichkeiten, die dem 
Anwender das Arbeiten erleichtern, 
machen den Umgang mit Profi Painter 
CPC zu einem wirklichen Vergnügen.“ 
Das schrieb CPC International im Test. 
Der ‚Aktuelle Softwaremarkt’ schloß 
mit dem Fazit: „Der Firma DATA 
BECKER sowie dem Autor des Pro- 
grammes ist nur zu gratulieren.“ Den 
einen fasziniert die Einfachheit der 
Bedienung über Symbole wie Bleistift, 
Farbeimer, Lineal oder Sprühdose, 
den anderen die Leistungsfähigkeit, 
die das Programm bietet: 
@e Pinsel mit verschiedenen Strich- 
stärken 
e Sprühdosenfunktion für Farben und 
Muster 
e Ausschneiden und Verschieben 
beliebiger Bildausschnitte 
@ Invertieren, Rotieren, horizontales 
und vertikales Drehen von Objekten 
@ optionale Rasterunterlegung 
@ problemloses Zeichnen von Geraden, 
Rechtecken, Kreisen, Ovalen usw. 


PROFI PAINTER CPC DM 99,- 


Dazu kommt das ausführliche deut- 
sche Handbuch, das leichtverständlich 
in den Umgang mit dem Programm 
einführt. 

Nur eine Frage blieb bei den Profi- 
Painter-Besitzern dennoch offen: ‚Wie 
hat Thomas Vervost das gemacht?” 
Die Antwort darauf gibt er selbst: mit 
dem großen Grafik-Buch zum CPC. 
Zusammen mit Jürgen Steigers, dem 


Co-Autor von 6128 Intern, fand sich ein 
Top-Team in Sachen Schneider-Grafik: 
‚Wir wollten das Schneider-Grafik-Buch 
schlechthin machen. Ein Buch, in dem 
Profis Neues lernen und das aus Ein- 
steigern Profis macht.” Aus diesem 
Anspruch ergibt sich schon fast die 
Gliederung. Der erste Teil widmet sich 
ausschließlich der Grafikprogrammie- 
rung in BASIC. Autoren und Leser 
entwickeln gemeinsam ein einfaches 
Malprogramm. Auf diese Weise erhält 
man nicht nur ein nützliches Utility, 
sondern es werden wichtige Grund- 
lagen vermittelt. Dann kommt die 
Spezialitäten-Abteilung: Business- und 
Vektorgrafik sind hier genauso 
Themen wie Peripheriegeräte zum 


DATA BECKER 


Merowingerstr. 30 - 4000 Düsseldorf - Tel. (0211) 310010 


Thema Grafik. Daß Jürgen Steigers zu 
Recht durch das 6128 Intern als CPC- 
Kenner bekannt wurde und sich auch 
durch seine „Bastelgags’ in der DATA 
WELT als Hardwarespezialist etablierte, 
zeigt sich im nächsten Kapitel. Hier hat 
er eine gehörige Portion Arbeit gelei- 
stet: er erklärt nicht nur, wie ein Light- 
pen funktioniert, sondern anhand von 
Schaltplänen und exakten Bauanlei- 
tungen auch gleich, wie man so etwas 
selber bauen kann. Der große Maschi- 
nensprache-Teil schließlich ist ein 
Leckerbissen für Grafik-Freaks und 
solche, die es werden wollen. Neben 
allen Einsprungadressen der Grafikrou- 
tinen finden Sie auch eine komplette 
Abhandlung über GSX. Sie wissen 
nicht, was GSX ist? Keine Sorge, SO 
geht es den meisten, denn bisher 
wurde diese grafische System-Erweite- 
rung noch nie wirklich dokumentiert. 
Lassen Sie sich von Thomas Vervost 
und Jürgen Steigers zeigen, wie Sie 
unglaubliche Grafiken auf Ihrem CPC 
zaubern können. Übrigens: Alles, was 
Sie hier gelesen haben, ist natürlich 
nur ein kleiner Ausschnitt dessen, was 
Sie in diesem Buch finden werden. 
Kunststück, bei fast 500 Seiten... 


Das große Grafikbuch zum CPC 
Hardcover, ca.500 Seiten, DM 49,- 
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PCW-LONDON: 
HERZ-WAS 
WILLST DU MEHR 


Die 5. offizielle Amstrad-Computermesse in London fand Anfang Oktober 
statt. Wie immer ein Riesenandrang und Riesenumsatz. Es traf sich in den 
noblen Ausstellungs- und Besprechungsräumen der Champagne Suite des 
Novotels in London alles, was Rang und Namen hat und sich mit den CPC, 
PCW bzw. PC beschäftigt. Veranstalter dieser ‚‚Amstrad-Computer-Show” 
war wiederum Derrek Meakin — Herausgeber der englischen Amstrad- 
Zeitung „Computing with the Amstrad’’. 


Überraschend, daß der neue PC 
kaum zu sehen war. Wie in Deutsch- 
land war er auch in England zu die- 
sem Zeitpunkt noch nicht ausgelie- 
fert — die Auslieferung sollte end- 
gültig Ende Oktober beginnen. Rie- 
sig war das Angebot an Software 
für den PCW-Joyce. Der PCW ist in 
England immer noch der Renner, 
daran wird aber der PC bald etwas 
ändern. So wurde auch bereits 
schon PC-Software auf dieser Messe 
angeboten, obwohl der Computer 
noch nicht erhältlich war. Der 
große Hit waren die Modems. Das 
Modemgeschäft kommt bei uns auf- 
grund der postalischen Bestimmun- 
gen nur langsam auf — ganz anders 
in England. Unsere in Deutschland 
verbreiteten Akustikkoppler benutzt 
dort kaum jemand — hier wird 
gleich mit dem Modem gearbeitet. 


DIE WICHTIGSTEN 
AUSSTELLER IN ALPHA- 
BETISCHER REIHENFOLGE 


AMS zeigt die AMX-Mouse am 
„AMX-PageMaker‘ (Zeitungs- und 
Postererstellung), den „AMX-Video 
Digitiser‘‘ (Übertrag von Videoauf- 
nahmen auf den CPC-Bildschirm), 
den „AMX-MagazineMaker‘“ (Kom- 
bination von „AMX-PageMaker“ 
und „AMX-VideoDigitiser‘), und 
den „AMX-3D Zicon‘ (Übertra- 
gung dreidimensionaler Vektorda- 
ten in Bildschirmgrafik). 

Amstrad zeigte den neuenPC und 
die neuen PC-Programme Reflex, 


Sidekick, Supercalc 3.1 und Word- 
star 1512. 


Arnor stellte die Programme ‚‚Pro- 


text“, „Prospekk“, „‚Promerge‘“, 
„Promerge Plus“, ,„Maxam‘“ und 
„Utopia“ und die ROM-Erweite- 
rungssteckkassette aus. 

ASD Peripherals zeigt eine 10 und 
20 MB Harddisk für den PCW und 
10 bis 40 MB Harddisks für den 
PCW und 10 bis 40 MB Harddisks 
für den PC. 

Audiogenec-Software zeigte das 
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„Cricket‘Spiel für den CPC, und 
die Programme „Calcumat“ (profes- 
sionelles Ne pianpropramn) und 
„Adam“ (Assembler/Disassembler/ 
Monitor). 

Babani zeigte preisgünstige Paper- 
back-Ausgaben speziell für den Am- 
strad Computer, insbesondere das 
neue Textverarbeitungsbuch für den 
PCW 8256 und PCW 8512. 

Bourne Software zeigte die Pro- 
gramme „World-Wise“, „Happy 
Writing“, „Maprally‘“‘, „Timeman 
One“, „Animal Vegetalbe Mineral“, 
„Happy Numers“, ,„‚Wordhang‘“, 
„Happy Letters‘, „Timeman two“, 
„Summer Tourist‘, „Egg-Stealers‘ 
und ‚Test your Skill“. 

Brittania zeigte sein Low-Cost 


Textverarbeitungsprogramm auf 
Diskette, ROM bzw. auf seiner 
ROMCard. 


Caxton zeigte Software für PC für 
die Betriebssysteme PC-DOS, MS- 
DOS und CP/M und die Program- 
me ,„Cardbox‘, ,„Touch’n’ Go“, 
„Brain Storm‘, ,Smartkey‘“ und 
„Scratch Pad Plus‘ für den CPC. 

Cirkit zeigte ihre HS-RX 1 ROM 
Erweiterungskarte, HS-Pl Parallel- 
und Centronicskarte und HI-S1 
Doppel-Seriellkarte und seinen 
Akustikkoppler mit einem Interface 
für den CPC mit neuer Software. 

Commtel war wieder mit seinem 
„Commtel-X‘“ Kommunikationspa- 
ket komplett mit Intervace, 
Modem, Software, Anschlußkabel 
vertreten. 

Compact Software zeigte ein Bu- 
siness-Programm für den PCW mit 
Schnittstellen für WordStar bzw. 
NewWord, Super Cac IH, Multi- 
plan, Cracker, Lotus 1-2-3 usw. 

Computer One zeigte seinen PCW 
Schreibmaschinenkurs und sein Kor- 
rekturprogramm mit über 20.000 
Wörtern (nur in Englisch). 

Connect Systems zeigt neue Ver- 
sionen des Finanzmanagerpro- 
gramms „Money-Maker“. 

DK’Tronics zeigte seinen „Speech 
Synthesizer“, seine „256K-Speicher- 
erweiterung“ und seinen Tuner zum 
Empfang von Fernsehprogrammen 
auf dem CPC-Monitor. Neu für den 
PCW sind die Module Joystickcon- 
troller, Joystick- und Soundcontrol- 
ler und eine Realtime-Uhr (Gehäuse 
in der PCW-Farbe!) 

DHCP-Electronics zeigte für den 
CPC und PCW Usersports ein Midi- 
Interface mit Midi-Software. 

Everham demonstrierte „DiscWi- 


zard‘“‘ (Kopiere von Kassette auf 

Diskette). 

Garwood bietet für den CPC die 
Programme ‚Pocket Wordstar de 
Luxe‘, „Pocket Calc.Star“, ‚Pok- 
ket Super-Sort‘“ und „Pocket Info- 
Star“ an. 

Glentop zeigte Bücher für den 
CPC wie: 

— „Advanced Users Guide“ 

— ‚„Amstrad Introduction to CP/ 
M+“ 

— ‚„Wordprocessing with the PCW 
8246/8512“ 

— ‚Using Logo on the Amstrad“ 

— „Amstrad First Steps in BA- 
sIc“ 

— „Amstrad Assembly Language 
Course“ 

— ‚Amstrad Starting BASIC“ 

— „Amstrad Sound, Graphics & Da- 
tahandling“ 

— „Computer-Games““ 

— „Choosing and Using Software 
on the Amstrad PCW 8256 und 
8512“ 

— ‚„Wordprocessing with the 
strad PCW 8256 und 8512“ 

— ‚„Wordprocessing with the 
strad PCW 8265 und 8512“ 

und viele andere und Neuankündi- 

gungen für den PC. 

Grafsales zeigte seine Digitiser- 
Grafik-Tabletts für den CPC, PCW 
und PC. 

Grayfield bietet Computerkurse 
für CAD-Programme und „Loco- 
script“ und hat sich auf den PCW 
8256 bzw. PCW 8512 und PC spe- 
zialisiert. 

Iansyse demonstrierte seinen 
‚Schreibmaschinen-Lehrgang‘, das 
Utility „Vika“ und sein Analyse- 
Programm für die Programmier- 
sprachen dBase, BASIC, PASCAL 
C 


Am- 


Am- 


IQ (Intelligence Quotient) zeigte 
einen neuen Computertisch. 

KDS hat den ‚Powercontroller“ 
(Controller zum Schalten elektri- 
scher Geräte), den ‚Printer ‘T*‘ 
Switch‘ (zwei Drucker am CPC), 
den „Communicator 8256‘ (Mo- 
demsystem für den PCW), ein RS 
232 Interface, ein „Parallelport“ 
(zur Steuerung von Robotern und 
Printern), eine „Romkarte‘“ (Auf- 
nahme von 4 Roms), das „Mini- 
Max Modem“ und ,„8-Bit-Printer- 
Port“ (8-Bit-Printer am 7-Bit-Port 
des CPC) im Angebot. 

Level 9 zeigte sein CPC Adven- 
tures „Ihe Price of Magic“. 

LCL-Software bot Aducational- 
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Software (Ausbildungs-Software) 
wie „Micro Maths‘, „Mega Maths“, 
„Micro English‘, „Micro French“ 
und ‚‚Master Maths“ an. 

Load & Run zeigte „Tele-Add“ 
und ‚„Stock-Control‘“ für den PCW 
8256 und pCW 8512 Joyce. 


Mikro-Gen demonstrierte die 
Programme für den CPC: „Master- 
Chess“, „‚Pyjamarama“, „‚Every- 


one’s a Wally‘“, „Herberts Dummy 
Run“, „Battle of the Planets“, 
„Ihree Weeks in Paradise‘, „Equi- 
nox“ und ‚Stainless Steel‘. 

Minerva bietet Dateiprogramme 
für alle CPC, PCW und die PC’s 
mit ausgezeichneten aufwendigen 
Such- und Sortiermöglichkeiten. 

Micro Link vertreibt nach wie 
vor das Programm „Weather Link“ 
zum Abruf der neuesten Bilder des 
Wettersatelliten. 

Mirage zeigte seinen „Mirage- 
imager‘“‘ (Übertragung von Kasset- 
tensoftware auf Diskette). 

Modem-House zeigte seine Kom- 
munikationssoftware und sein Mul- 
ticomputermodem. 

Newstar zeigte den „Spool CPM/ 
M+“ (CP/M Utility, zur Eingabe 
auf dem Keyboard während der 
Drucker läuft) für den PCW und 
das Buch „The Amstrad CP/M+“ 
mit Diskette (520 Seiten). 


Northern Computers war mit der 
CPC ‚„Amstelex Box‘ (Verbindung 
in das Telexnetz) und seiner 
JOYCE 20 MByte Harddisc ‚Am- 
store‘ vertreten. 


Pride Utilities zeigte unter altem 
Bekannten das Printer-Utility „Prin- 
ter-Pac“. 

Romantic Robot bot sein CPC 
Multizweckinterface „Multiface 2“ 
(Kopieren von Kassette auf Disket- 
te) an. 

Rombo Productions zeigte einen 
neuen Video-Digitizer für alle CPC’s. 

Sagesoft bot die Programme ‚‚Po- 
pular‘‘“ (Rechnungsschreibungspro- 
gramm), „Shit-Chat“ (Kommunika- 
tionsprogramm), „Shit-Chat E-Mail“ 
(Mailboxprogramm), „Shit-Chat 
Viewdata“ (Modemprogramm), 
‚Shit-Chat Combo“ (Kombination 
von Viewdata und E-Mail), „‚Magic- 
files“ und „Sage Retrieve‘ (Daten- 
banksystem) an. Für den PC zeigte 
Sagesoft die Programme Bookkee- 
per, Accountant, Payroll, Retrieve, 
Chit-Chat, PC-Planner, Desk-Set 
und PC-Write. 
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Sandpiper demonstrierte die Pro- 
gramme „Sandpiper-Accounts““, 


„Sandpiper-Payroll“ und den „Sand- 
piper-File-Manager“. 

Saxon zeigte seine Programme 
‚Micro File“, „Micro Word“, „Fle- 
xilabel“, „Microspread‘“, „Lock-it“ 
für den CPC 6128 und den PCW. 
Die PC-Versionen kommen. 

Screens bot die 1 MB CPC-Spei- 
chererweiterung an, die wie ein Dis- 
kettenlaufwerk verwendet werden 
kann. 


Shekhana Computer Service 
zeigte neue CPC Spiele. 
Sigma präsentiert eine ganze 


Reihe von Büchern für den CPC, 
PCW und PC, leider nur in englischer 
Sprache. 

Sirensoftware zeigte sein CPC- 
Diskettenübertragungsprogramm 
„discovery‘‘ zum Übertragen von 
Band auf Diskette mit einer Turbo- 
Option und die Programme „Ma- 
ster-Disk“, „Tape Utility V 3.4“ 
und „Disc Mate‘ (Directionary- 
Editor) sowie seine Disketten-Zweit- 
laufwerke. 

Software Mailorder Gruppe gibt 
einen Katalog heraus, der die der- 
zeit erhältliche Software und Hard- 
ware für den CPC. PCW und PC an- 
bietet. 

Sunshine Books zeigte die neue- 
sten Amstrad Titel wie ‚Master 
Machine Code on your Amstrad 
CPC 464 & 664°, „Making Music 
on the Amstrad CPC 464 & 664“, 
„Amstrad Advanced Programming 
Techniques“ und ‚The working 
Amstrad“. 

The Electric Stuio demonstrierte 
seinen Lightpen und Grafikpro- 
gramme auf dem CPC und PCW und 
die Programme ‚Music-Box“ und 
„Multi-Text“ auf dem CPC. Neu 
sind eine Mouse und ein Video 
Digitizer für den CPC und PCW. 

Timatic zeigte ihre Interfaceer- 
weiterungen für den CPC mit dop- 
pelter RS 232 Schnittstelle, Paral- 
lel-Userport, 8-Bit-Printerport und 
freiem Sockel für ein 16 K ROM 
sowie die 5 1/4“ Diskettenlauf- 
werke und die Programme „Micro- 
draft,, (Zeichenprogramm) und 
„Chamäleon“ (Datenübertragung). 

Transform demonstrierte die Pro- 
gramme „MasterFile‘, ‚„MasterCalc“ 
und „Draw“ und will ins PC Ge- 
schäft einsteigen. 

Vanguard demonstrierte seinen 
Musikgenerator „Music-Master““. 


TEST 


Mit den Schneider PC-Modellen ist eine neue Ära der niedrigpreisigen PC 
angebrochen. Zum Vergleich nahmen wir uns daher mal einen der günstig 
angebotenen sogenannten „Clones“ unter die Testlupe. Zwar soll das Fazit 
nicht vorweggenommen werden, aber’ auch diese Anbieter kochen nur mit 
Wasser, und ein optisch günstiger Preis ist noch lange nicht der Weisheit 


letzter Schluß. 


Zum gleichen Zeitpunkt, als wir 
den neuen Amstrad/Schneider PC- 
1512 kennenlernten, testeten wir 
gerade einen IBM-Clone der Fa. 
Jeschke in Kelkheim. Ein PC-Clone 
ist eine der zahlreichen Nachbauten 
des IBM-PCs, die derzeit auf dem 
Markt sind. Der Tester fragte sich: 
„Lohnt sich der Low-Cost-PC?“ 
unter dem Gesichtspunkt des Um- 
stiegs von einem Homecomputer 
auf einen PC (Personal Computer) 
und kam zu folgendem Ergebnis: 
„Viele derzeitige Homecomputer- 
benutzer werden sich bei den stän- 
dig fallenden PC-Preisen schon oft 
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überlegt haben, auf ein derartiges 
Gerät umzusteigen. Unter den IBM- 
Clones fiel insbesondere wegen des 
Preises die ICO-Serie der Firma 
Jeschke angenehm auf: Schon für 
DM 1282,— erhält man die Grund- 
version mit 256 KB, einer Farbgra- 
fikkarte, deutscher Tastatur und ei- 
nem Diskettenlaufwerk (ohne 
Monitor). Diese Geräte sind mit 
einer zweiten Floppy bzw. Hard- 
disk (20 MB) nachrüstbar. 

Ziel des Test war zu prüfen, was 
dieser fast vollständig nachgebaute 
IBM-PC bietet. 

Schon beim Auspacken des Gerä- 


TEST 


tes fiel mir die etwas spärliche Do- 
kumentation auf, die für völlige 
EDV-Einsteiger nur schwerlich aus- 
reichen dürfte. Computerneulinge 
müssen zusätzlich zu der mitgelie- 
ferten Dokumentation noch Einfüh- 
rungsliteratur über den IBM-PC/ 
XT und Kompatible kaufen. Hier 
zeigen sich die Vorteile des kompa- 
tiblen Nachbaus, man kann Bücher, 
Hardwareerweiterungen und Pro- 
gramme des IBM ohne Adaption 
verwenden. Angenehm registrierte 
ich, daß der PC-Clone über ein Me- 
tall-Klappgehäuse verfügt, so daß 
Erweiterungskarten sehr leicht ein- 
zubauen sind. 

Im Inneren des Computers geht 
es aufgeräumt zu. Auch an der Ver- 
arbeitung wurde nicht gespart, viele 
ICs sind gesockelt und alle Slots 
mit vergoldeten Steckzungen ver- 
sehen. Das Netzteil ist mit seiner 
Leistung harddisktauglich und hin- 
terläßt einen soliden Eindruck. 


Der Text der versprochenen 100- 
%igen Kompatibilität ergab, daß 
alle unter MS-DOS eingeladenen An- 
wendungsprogramme klaglos lau- 
fen. Dann wurde der als Kompati- 
bilitätstest berüchtigte Flugsimula- 
tor der Firma Microsoft in der al- 
ten Version gebootet, d.h. von der 
Diskette geladen. Auch hier gab es 
keine Probleme, jedes Programm 
läuft — bis auf eine Art von Pro- 
grammen: Es handelt sich dabei 
um einige wenige Hilfsprogramme 
der Firma IBM, die auf die BASIC- 
ROMs des Original IBM PCs zurück- 
greifen. Doch auch diese laufen 
auf dem PC-Clone, wenn in dessen 
Eprom-Steckplätze der Grundpla- 
tine für das mitgelieferte BIOS 
(also das Betriebsprogramm für die 
Ein-/Ausgabe-Funktionen inclusive 
Diskettensteuerung) das Original 
IBM-BIOS gesteckt werden und zu- 
sätzlich die freien Steckplätze mit 
den BASIC-ROMs bestückt werden. 
Wer also diese ROMs beschaffen 
kann, ist in der Lage, sich einen 
technisch 100 % kompatiblen IBM- 


Der von uns getestete PC-Clone: Preis- 
günstig als Grundmodell ohne Zubehör 
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PC herzustellen. Wohlgemerkt, das 
Gerät braucht diese ROMs zum nor- 
malen Betrieb nicht. 

Leider wird das Gerät auch ohne 
das Betriebssystem MS-DOS ge- 
liefert, was man allerdings gleich 
mitbestellen kann. Der Test der 
Hardwarekompatibilität, d.h. der 
Test von Hardware-Erweiterungs- 
karten, der Maus, I/O-Karten, der 
Harddisk etc. fiel psoitiv aus. 

Da das Gerät in der Grundver- 
sion ohne Normschnittstellen gelie- 
fert wird, ist es sinnvoll, das Gerät 
gleich mit einer sogenannten Multi 
1/O-Karte zu bestellen, da man in 
diesem Falle für einen Aufpreis von 
nur 130,— DM folgende Optionen 
erhält: 

— Akkugepufferte Echtzeituhr 

— Paralleler Druckerport (Centro- 
nics) 

— Eine serielle Schnittstelle (RS- 
232), eine 2. ist als Option durch 
Einsetzen zweier ICs realisierbar 

— Gameport 
Auch muß der Monitor extra be- 

zahlt werden und eine Aufrüstung 

des RAM-Speichers ist von Anfang 
an empfehlenswert. 


Fazit: Für unter 1.300,— DM er- 
hält der Kunde ein Gerät, das 100- 
%ig kompatibel ist, und das beson- 
ders für Schüler und Studenten, 
die einen leistungsfähigen Rechner 
suchen, aber nur wenig dafür aus- 
geben können. Die etwas spärliche 
Dokumentation und das nicht im 
Lieferumfang enthaltene Betriebs- 
system, die fehlendeMultifunktions- 
karte und der fehlende Monitor 
erhöhen den Gesamtpreis, so daß 
dieser derzeit nahe an den Amstrad/ 
Schneider PC-1512 herankommt. 


Wertung: 


günstiger Preis 

solide Qualität 

100 %ige Kompatibilität 

deutsche Tastatur 

hochauflösende Monitore und 

Grafikkarten ohne besonderes 

Netzteil einsetzbar 

— geringe Dokumentation 

— MS-DOS gegen Aufpreis 

— Schnittstellen, Echtzeituhr, Ga- 
meport gegen Aufpreis 

— Monitor gegen Aufpreis 

(Hans Schmidt) 
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ANZEIGEN 


IHR SCHNEIDER- 
EXPERTEN ... 


Ns = Run, 
se“ M ' 
© 
9 \\ & 
Z 
SEN PZN 
Wer besSsC 


A + C Vertrieb, 1 Berlin 44, 
Emser Str. 18 


Beachten Sie 
unsere neue Anschrift! 


%u (COMPUTEREI vv 
. Hardware 
ud LONPUTER DIVISION 
1000 Berlin 42, 
Tempelhofer Damm 120 
Tel. 030-752 2091 


Software 


Literatur 


Woltermann - Electronic - 
Computer - Datentechnik 


E Ihr Fachhändler für 
PR Schneider-Computer 


Gute Beratung - qualifizierter Service 
Große Auswahl an Zubehör und 
Fachliteratur 


3414 Hardegsen/Solling 
Lange Str. 27, Tel. 05505/1694 


Computer Reschke GmbH 


Hohe Str. 21a - 4600 Dortmund 1 
BTX 921509 Ruf 0231/1600 14 
Wir führen Schneider 
und Zubehör 
Eigener 48 Std. Service für alle 
Home-Computer und Zubehör 


IHR Computerfachhändler im 
Raum Koblenz/Bonn/Neuwied 
Wır verkaufen nıcht nur, sondern 
wır beraten Sıe ausführlich 
Unsere Werkstatt paßt bereits vor 
handene Hardware an 
Interessante Konditionen für Schu- 
ler, Schulen und Sammelbesteller 
Fordern Sıe unsere Pıieisliste an 


IRP - Computersysteme - KLEPPER 


Wilhelmstr. 27, 5461 St. Katharinen 
Telefon 02645/540 


Modulare Software 
für alle Schneider Rechner 
CPC 464, CPC 664, CPC 6128 
... Textverarbeitung ... Kassenbuch- 


führung ... Rechnungsschreibung ... hard-&software 


Kundenadreßverwaltung ... Mail- 
merge ... Hotelreservierung ... 


Ch. Schebesta & Partner 
Frankfurter Str. 70 
6078 Neu-Isenburg 

Telefon 06102/37549 


Computer u. Bürotechnik 
Dipl.-Ing. Neuderth 
Frankfurter Str. 23/Ecke Friedenspl. 


6090 Rüsselsheim 
Tel. 06142-68455 


Beratung, Schulung, 
Programmierung, Software 


Micro-Computermarken cOMPUTER 
CENTER 


Partner führender 


Sindelfinger Allee 1, 
7030 Böblingen, Tel. 07031/2260 15 


Er RICHARD 


HEINRICH 


& SOHN N 


Winnender Str. 25, 7054 Korb 
Tel. 07151/32513 


Ihr kompetenter, autorisierter 
Fachhändler 


7480 Sigmaringen : Rapp-Gässle ' 
Tel. 07571/12483 
Hard- u. Software - Peripherie - Literatur 


ash DWISION 


Ihr Fachhändler 
Lindenstr. 3, 7700 Singen 
(Hohentwiel), Tel. 07731/64433 


Ihr kompetenter, autorisierter 
© SCHNEIDER-Fachhändler 


Srhellkammer 


Hard- u. Software, Peripherie, 
Literatur 
Fachkundige Beratung - kompletter 
Service 
7700 Singen, Freibühlstr. 21-25 
Tel. 07731/82020 


expert 
Computer Grahle 
Eisenbahnstr. 33 
7980 Ravensburg 
Telefon 0751/15955 


Mietkauf - Leasing - Teilzahlung 


‚ma Versand frei Haus 
Leigeb 32, -ncn. 


Dipl.Ing. FH Peter Leigeb 
8170 Bad Tölz, Markstr. 38 


Wir informieren Sie gerne 
Tel. 08041/9739 


HARTLEX 


8359 Aidenbach Tel. 08543/880 
8359 Ortenburg Tel. 08542/7866 


Schneider PC 1512 
Schneider Zubehör 
Staubschutzhauben 
Anrufbeantworter 
Funktelefone 
Designtelefone 
Gesamtkatalog 3,— DM 


B. V. Steponaitis, 
Obere Straße 30, 8720 Schweinfurt 


Ernst Taubenberger 
Weißenburger Str. 25, 8900 Augsburg 
Händlerangebot erwünscht 
Softwareautoren gesucht 


Alles für den CPC 
Beratung, Hardware, Software, 
Service 


FUNK + bull 


8939 Bad Wörishofen 
Weiherweg 4, Tel. 08247/2171 


REPORT 


HOBBY’"- 
TRONIC 86 


Hifi, Modellbau, Compu- 
ter — unter diesem Motto 
lief die Stuttgarter Messe. 
Eigentlich eine interes- 
sante Konstellation, wie 
man meinen sollte! 

Vom 15.10.-19.10.86 
waren die Hallen 7-14 
am Killesberg mit der zur 
Zeit größten Ausstellung 
für den Hobbybereich in 
Süddeutschland belegt. 
Wobei die Betonung auf 
‚Hobby‘ liegt, denn diese 
Messe entwickelt sich von 
Jahr zu Jahr mehr zu ei- 
nem Treffpunkt für den 
interessierten Neuling. 
Vom Flair und der Atmo- 
sphäre ähnlicher Veran- 
staltungen (Köln, Düssel- 
dorf, München) war 
nichts zu spüren. Viel- 
mehr bekam man den 
Eindruck, daß es sich hier- 
bei um eine bessere Ver- 
kaufsausstellung von be- 
reits mehr oder minder 
bewährten Objekten han- 
delte. Von den großen 
Firmen und Herstellern 
war weit und breit nichts 
zu sehen. Selbst der 
schon vielbesprochene 
Schneider PC blieb unauf- 
findbar. 

Vertreten waren viel- 
mehr große Kaufhäuser 
mit ihren Computerabtei- 
lungen, Verlage und klei- 
nere Hersteller, die durch 
die hobby ‘tronic auch 
die Möglichkeit sahen, 
auf einer Messe präsent 
zu sein. An fast jedem 
Stand war irgend ein gän- 
giges Gerät zu sehen, das 
leider nur zu Demonstra- 
tionszwecken diente, was 
allgemein zu bemängeln 
war. Das übliche Bild von 
Kids und Freaks, die sich 
um die tollste Maschine‘ 
mit den heißesten Spielen 
und neuesten Anwendun- 
gen drängten — von ande- 
ren Messen ein durchaus 
gewohntes Bild, das viel 
zur Stimmung beiträgt — 
war  bedauerlicherweise 
nicht gegeben. Kein Wun- 
der — es waren, bis auf 


irgendein neues Antista- 
tikspray, überhaupt kei- 
ne Neuigkeiten zu sehen. 

Für mich einzig posi- 
tiver Lichtblick war der 
Stand von Christian Bel- 
lingrath, der CP/M Soft- 
ware zu wirklich freund- 
lichen Preisen lieferte, 
auch unter CP/M Plus, 
am Stand aber leider 
nicht im Schneider-übli- 
chen 3° Format, wobei 
Besitzer eines 5 1/4“ 
Laufwerks die Gelegen- 
heit beim Schopfe pak- 
ken konnten. Andere 
Formate werden auf An- 
frage kopiert und so ko- 
sten dann Public Domain 
Programme, also frei er- 
hältliche und zu verviel- 
fältigende Software, wie 
dBase DM 10,— + DM 7,50 
für das Kopieren. Porto, 
Verpackung usw. sind im 
Preis enthalten. Die Un- 
kosten reduzieren sich 
bei größeren Bestellmen- 
gen erheblich. Alles in al- 
lem, eine wirklich günsti- 
ge Einkaufsquelle, insbe- 
sondere wenn sich ein 
Kreis von Anwendern 
(Computerclubs) zusam- 
menschließt. 

Um bei den günstigen 
Preisen zu bleiben — Hor- 
ten überließ den Kids ver- 
schiedene Spiele, unter 
anderem auch Boulder 
Dash, für knapp DM 5,—. 
allerdings in einer recht 
einfach anmutenden Ver- 
packung, was ja weiter 
nicht stört, doch ich ver- 
mute, daß es sic hierbei 
um eine abgespeckte Ver- 
sion handelt. 

Stellenweise arteten 
die Billigangebote in rich- 
tige Ramschaktionen aus, 
so geschehen bei Müller 
electronic, wo man einen 
Sinclair Spectrum 16K 
für DM 29,—, den ZX 81 
für DM 15,— oder den 
speziellen Sinclair 
Drucker für DM 18,— er- 
hielt, alles allerdings ohne 
Funktionsgarantie, doch 
eine gute Gelegenheit für 
den Freak, sich ein Zweit- 
gerät, z.B. für Steuerungs- 
zwecke, anzuschaffen. 
Michael Schweyer-Duarte 


VERDIENEN SIE GELD 
MIT IHREM COMPUTER! 


Haben Sie einen CPC 464 oder 6642? Einen 61282? Oder 
einen JOYCE? Können Sie programmieren? In Basic oder 
Maschinensprache? Dann bietet SCHNEIDER AKTIV 
Ihnen die Möglichkeit, mit diesem Hobby Geld zu verdie- 
nen! 


Wie? Ganz einfach. Sie senden uns die Programme, 
die Sie für einen Abdruck als geeignet halten, zusammen 
mit einer Kurzbeschreibung, aus der auch die verwende- 
te Hardware — eventuelle Erweiterungen — benutzte Pe- 
ripherie — hervorgehen muß, ein. 


Benötigt werden: eine Datenkassette oder Diskette! 
Wenn die Redaktion sich überzeugt hat, daß dieses Pro- 
gramm läuft und sich zum Abdruck eignet, zahlen wir 
Ihnen pro Programm je nach Umfang bis zu DM 300,—! 


Name des Einsenders: 
Straße /Hausnr. /Tel.: 
PLZ/Ort: __ 


Für das ‚‚Listing des Monats‘‘ sogar DM 1.000,'—. 
Sie erhalten Ihre Kassette /Diskette selbstverständlich 

zurück, wenn Sie einen ausreichend frankierten 

Rückumschlag mit Ihrer Adresse beifügen. 


Bei der Einsendung müssen $ie mit Ihrer Unterschrift ga- 
rantieren, daß Sie der alleine Inhaber der Urheber-Rechte 
sind! Benutzen Sie bitte anhängendes Formular! (Wir 
weisen darauf hin, daß auch die Reaktion englische 
Fachzeitschriften liest und ‚‚umgestaltete‘‘ Programme 
ziemlich schnell erkennt). 


Um Ihnen die Arbeit zu erleichtern, finden Sie hier ein 
Formular. Sie können es ausschneiden oder fotokopie- 
ren. 


Hiermit biete ich Ihnen zum Abdruck folgende(s) Programm(e) an: 


Benötigte Geräte: 


Kassette [_] Diskette 


Beigefügt [_] Listings 


Ich versichere, der alleinige Urheber des Programms zu sein! 
Hiermit ermächtige ich die Redaktion, dieses Programm abzudrucken und wirtschaftlich zu verwerten. Sollte es in 
den Kassetten-Service aufgenommen werden, erhalte ich auch dafür eine entsprechende Vergütung. Das Copyright 


geht an den Verlag über. 


Rechtsverbindliche Unterschrift 


SCHNEIDER 
AKTIV 


Postfach 1107 
8044 Lohhof 


